Jetzt komm ich wieder mit meinem pos
Geht das auch mit Pos?
Delphi-Quellcode:
if pos(edit2.text,',') then
begin
//was hier passieren soll
end;
Müsste doch auch gehen, oder?
Würde dann meiner Meinung so aussehen.
Beide Variablen sind natürlich integer.
Delphi-Quellcode:
zaehler:=0;
repeat
zaehler:=zaehler+1;
zahl:=zaehler;
zahl:=zahl/7;
if pos(zahl,',')then showmessage('Zahl ist keine natürliche Zahl');
until i=100; //als Beispiel
(ungetestet)
Hoffe, ich konnte dir helfen, auch wenns unübersichtlich ist ...