Chamada2

24/02/2003

2

É o seguinte criei uma função que chama ela mesma só que está dando um erro: Usei a função while e não consegui. Me ajudem.

STACK OVERFLOW.
ela tem que ficar se chamando até eu mudar uma letra do edit e ai ela para.

Olha o codigo.

function TForm2.chamada(pA: string): string;
var Va:string;
begin
if pA = ´A´ then
begin
Va:=Form1.Edit1.text ;
chamada(Va);
end
else
begin

form2.ShowModal;
end;
end;


Anonymous

Anonymous

Responder

Posts

24/02/2003

Anonymous

Explique melhor oq vc que fazer para te dar a melhor maneira para vc fazer!


Responder

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários,
consulte nossa política de privacidade.

Aceitar