ich habe z.B.folgendes
Delphi-Quellcode:
function serial(user: string): string;
var:
s0, s1, s2, s3, ...: string;
...
Begin
s0:='blabla';
s1:=s0+ 'abc'; // diesen wert möchte ich nehmen
...
// die Funktion geht weiter
...
Result:= ...
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
begin
if edit1.text = serial(s1) then
begin
wie kann ich über das Button den Wert von
S1 holen ?
Natürlich ist das Geheimnis ! Funktion-Name sagt was oder ?