Forum: Object-Pascal / Delphi-Language
Delphi
by Luckie,
20. Nov 2009
Ähm, der Thread ist fast sieben Jahre alt. :?
Forum: Object-Pascal / Delphi-Language
Delphi
by Luckie,
28. Feb 2003
Du hast es erfaßt. :mrgreen: Und ich werde wohl deinen Code nehmen. Denn mit einer Klasse schießt man damit wohl mit Spatzen auf Kanonen. Trotzdem bleibt mein Wunsch aus dem anderen Topic bestehe, was man verbessern könnte oder ändern sollte. Dient ja auch der Übung.
Forum: Object-Pascal / Delphi-Language
Delphi
by Luckie,
28. Feb 2003
Mehr oder weniger. Kompilieren tuit er, er macht nur nicht das, was ich will.
Forum: Object-Pascal / Delphi-Language
Delphi
by Luckie,
28. Feb 2003
OK, OK, OK. Ich habs. Die letzte Zeile muß natürlich so
property SplitStringEx: TSplitStrArray read FStrings write SplitString;
heißen.
Forum: Object-Pascal / Delphi-Language
Delphi
by Luckie,
28. Feb 2003
OK, habe es jetzt so geändert:
type
TSplitStrArray = array of String;
type TSplitString = class
private
FString2Split : String;
FSepChar : Char;
FStrings : TSplitStrArray;
Forum: Object-Pascal / Delphi-Language
Delphi
by Luckie,
28. Feb 2003
Öhm, was hast du jetzt gemacht außer die Reihenfolge zu ändern? (Was übrigens auch nicht hilft. :( )
Forum: Object-Pascal / Delphi-Language
Delphi
by Luckie,
28. Feb 2003
Ich habe mir eine eigene Klasse entworfen um einen String der durch Separatoren getrennt ist in einzelne Strings zu zerlegen.
type TSplitString = class
private
FString2Split : String;
FSepChar : Char;
FStrings : TSplitStrArray;
FStringsCount : Integer;
FSepPos : array of Integer;
procedure SetSplitString(SplitStr: String);