[duda Sencilla] Delphi

[[Caral]]

Hola
Lo que puedo ayudar:
Codigo 1:

Código Delphi [-]
procedure TForm1.FormCreate(Sender: TObject);
var
a, b :integer;
begin
a:= 4;
b:= 4;
if a = b then
edit1.Text:= 'hola';
end.

Codigo 2

Código Delphi [-]
Code2:

function DD(s:string):string;
begin
s:= 'h';
result:= s + s + s;
end;
//
procedure TForm1.FormCreate(Sender: TObject);
var
a:string;
begin
a:='hhh';
if a = DD then
edit1.Text:= 'hola';
end.

Creo que por ahi va el asunto:
Saludos