Var in einer Funktion über ein Button aufrufen !

[Der.Kaktus]

Zitat von Delphiturbo:

Hallo

ich habe folgendes

Delphi-Quellcode:

function serial(user: string): string;
var:
s1: string // das will ich über ein Button aufrufen
...

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
if edit1.text = serial(s1) then
begin
Form2.Show;
end;

Die Variable ist nicht in Button deklariert sondern nur in der Funktion
wie kann ich s1 in Button deklarieren ?

Zitat von Matze:

Hallo,

irgendwas stimmt an deinem Konzept nicht. Wenn du in Button1Click die Variable s1 benötigst, könntest du diese in der Funktion zurückgeben oder - weniger schön - ginge es mit einer globalen Deklaration (Private-Abschnitt).
Eine Variable ist generell nur in dem Block gültig, in dem sie deklariert wurde. Eine doppelte Deklaration würde folglich nichts nützen.

Es wäre jedoch sinnvoll, wenn du genau erklären würdest, was du erreichen möchtest. Da gibt es sicher eine deutlich bessere Lösung.
Ich gehe davon aus, dass OOP noch nichts für dich ist und ob das was bringen würde, kann ich aus deiner Beschreibung nicht entnehmen.

Grüße

Hallo, ich wuerde an Deiner Stelle s1 als globale Variable definieren..also nicht innerhalb einer Funktion.