[Error] Unit1.pas(38): Type of expression must be BOOLEAN

[Continaçon]

troque a linha,

if (dialogAbrir) then

por

if (dialogAbrir.Execute) then

que vai funcionar! "if (dialogAbrir) then" nao retorna um valor boolean por isso nao funciona.

Obrigado, funcionou ^-^

[gothie]

Estou tentando abrir um arquivo txt no delphi, porém, quando compilo dá esse erro "



Por quê está dando esse erro e como resolve-lo?

troque a linha,

if (dialogAbrir) then

por

if (dialogAbrir.Execute) then

que vai funcionar! "if (dialogAbrir) then" nao retorna um valor boolean por isso nao funciona.

[Continaçon]

Estou tentando abrir um arquivo txt no delphi, porém, quando compilo dá esse erro "

[Error] Unit1.pas(38): Type of expression must be BOOLEAN" eis o código do programa:

procedure TForm1.btnAbrirClick(Sender: TObject);
var
arquivo: TextFile;
LinhasArq: String;
begin
memoTexto.Clear;
if (dialogAbrir) then
if (dialogAbrir.FileName <> '') then
begin
editAbrir.Text := dialogAbrir.FileName;
AssignFile(arquivo,dialogAbrir.FileName);
Reset(arquivo);
While Not (Eof(arquivo)) do
begin;
Readln(arquivo,linhasArq);
memoTexto.Lines.Add(linhasArq);
end;
CloseFile(arquivo);

end;
end;

end.

Por quê está dando esse erro e como resolve-lo?