Hallo Xenar,
das wird nicht einfach. Hier mal ein Beispiel fuer drei Variablen (A, B, C):
Delphi-Quellcode:
for i := 0 to Memo1.Lines.Count-1 do
begin
Line := Memo1.Lines[i];
VarName := Trim(Copy(Line, 1, Pos('=', Line)-1));
VarValue := Trim(Copy(Line, Pos('=', Line)+1, Length(Line)));
vars[Ord(Uppercase(varName)[1])-Ord('A')] := StrToIntDef(VarValue, 0);
end;
vars ist ein Array von 0..2 of Integer. Jede Anweisung muss in einer neuen Zeile stehen. Wenn du es dynamischer machen willst, wird das ganze vieeel komplizierter, aber die Idee sollte so rueberkommen.
Uebrigens: den Code habe ich nicht getestet, aber er sollte funktionieren
Greetz
alcaeus