Forum: Programmieren allgemein
Delphi
by Ajintaro,
3. Mär 2014
Hey schönen Montag euch allen,
Ich habe nun eine Lösung entwickelt, welche einen Mix aus euren Codevorschlägen darstellt. Mit unten stehendem Code kann ich
99,10,Text1=Text2 oder 99,Text1=Text2 komplett zerlegen:
procedure TForm1.b_schneidenClick(Sender: TObject);
var s,s1,s2,s3,s4:string;
zahl: double;
ipos, xpos:integer;
Forum: Programmieren allgemein
Delphi
by Ajintaro,
28. Feb 2014
Hallo ihr lieben,
Ich habe etwas weiter experimentiert und dabei eure Vorschläge berücksichtigt. Zunächst hat DeddyH den Fehler in meines codes erkannt, der 2. index wird um die Zeichen verschoben, welche ich vorher entferne :thumb:
Die Funktionslösung von sx2008 hat mir auch sehr gut gefallen, das ist in der Tat besser als meine Delete-Serie. Allerdings bekomm ich dann ein Problem, wenn...