ah danke, hab mich aber vorhin entschieden selber was zu schreiben weil die funktionen mir alle etwas lang vorkamen. kann man dies so machen:
also zuerstmal die variablen:
str ist pass,username
okay und dann
Delphi-Quellcode:
zahl := 1;
lenght := lenght(str);
gesucht := ','
while zahl < lenght + 1 do begin
letter := copy (str,zahl,zahl +1);
if letter = gesucht then begin
pw := copy (str , 1, zahl - 1);
user := copy (str, zahl + 1 , lenght);
zahl := 500 // hohe zahl um while schleife zu beenden
end;
zahl := zahl + 1;
end;
haut des hin?
[edit=Sharky]Delphi-Tags gesetzt. Bitte in der Zukunft selber machen. Danke. Mfg, Sharky[/edit]