title image


Smiley Var Parameter verwenden
Hy Popi!





Procedure TwoStringsBack(Var A,B:String);

Begin

A:='Hallo';

B:='Popi';

End;



procedure TfrmMain.Button1Click(Sender: TObject);

Var S1,S2:String;

begin

TwoStringsBack(S1,S2);

Showmessage(S1+' '+S2);

end;





S1 und S2 müssen Variablen sein. Es wird nämlich nicht der Wert sondern eine Referenz (Zeiger) auf die Variable übergeben. Achtung, der Inhalt von S1 und S2 wird demzufolge gnadenlos überschrieben.



Viele Grüsse



OLLI

geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: