Zitat von
iphi:
Es handelt sich nämlich nicht nur um 3 Ausdrücke sondern um ca. 100.
Ich liebe Compilerschalter
Auweia !!! Bei 100 Prüfungen müssen doch alle Alarmglocken läuten.
Hast du mal etwas von einer For-Schleife gehört?
Oder einem Konstanten-Array?
Delphi-Quellcode:
const
LISTE: array[0..99] of string = (
'A=',
'B=',
.... );
...
for i := Low(LISTE) to High(LISTE) do
begin
erg := FindEntry(F, LISTE[i], wert[i]);
ok := ok and erg;
end;