erstmal danke für eure schnelle und netten Antowrten.
Ich dachte zuerst ich müßte mir jetzt anhören ich soll google benutzten. Echt gut hier.
Herzlichen Glückwunsch Patti zum 300ten Post
AWas : TMeinTyp) : boolean;
Ich glaube das ist interessant für mich
Um mein Problem nochmal zuerläutern:
So sieht mein String aus.
s:='spieltag=1|nachname=kamp|vorname=marvin|tippst ring=bochum2gegner6;dortmund1gegner1;schalke1gegne r0;leverkusen3gegner1;|';
Die Funktion um die Informationen von einen zu Trennen hab ich auch schon geschrieben, sieht zwar nicht sonderlich schön aus ^^ aber funktioniert:
Delphi-Quellcode:
function getstring(s:string) :boolean;
var
st,nn,vn,ts:string;
pos1,pos2,pos3,pos4,trenn:integer;
begin
pos1:=pos('spieltag=',s);
st:=copy(s,pos1+9,1);
showmessage(st);
trenn:=pos('|',s);
delete(s,1,trenn);
pos2:=pos('nachname=',s);
trenn:=pos('|',s);
nn:=copy(s,pos2+9,trenn-10);
showmessage(nn);
Delete(s,1,trenn);
pos3:=pos('vorname=',s);
trenn:=pos('|',s);
vn:=copy(s, pos3+8,trenn-9);
showmessage(vn);
Delete(s,1,trenn);
pos4:=pos('tippstring=',s);
trenn:=pos('|',s);
ts:=copy(s, pos4+11,length(s));
showmessage(ts);
end;
Das er mir die Ergebnisse in Showmessage ausgibt war nur zu testzwecken.
Jetzt möchte ich die Funktion aber so umschreiben, das wenn ich die Funktion aufrufe
getstring(....) möchte ich dir Funktion genau sagen welcher dieser Informationen er mir als Rückgabewert ausgeben soll.
z.B getstring('string', spieltag) ausgeben soll er mir dann "1" oder "Spieltag=1".
Ich denke da kommt das ins spiel "AWas : TMeinTyp)" nur wie baue ich diese Klasse auf um mein Problem zu realisieren.