Forum: Sonstige Fragen zu Delphi
Delphi
by Mavarik,
27. Jan 2016
3 Sachen...
1. Zeig mal Deine Testroutine.
2. Vergleiche mal die Version mit der Insert variante.
3. Schreibe bitte meinen Nickname richtig... Danke
Forum: Sonstige Fragen zu Delphi
Delphi
by Mavarik,
27. Jan 2016
@Sir Rufo sehr nice und wie immer natürlich variable und "zu gebrauchen" :thumb:
@EgonHugeist der Quadmove ist natürlich sehr nett, aber da durch brauchst Du drumrum natürlich mehr...
Wäre zu testen ob der Quadmove das wett macht...
Alle Routinen mit Insert - gehen natürlich gar nicht - weil der String nicht nur 192 Zeichen, sondern auch mal 20MB lang seinen kann... :stupid:
Die Frage...
Forum: Sonstige Fragen zu Delphi
Delphi
by Mavarik,
27. Jan 2016
Wie wäre es mit
procedure TForm1.leerzeichen(Const Text:string);
var
_Result : String;
PSource,PDest,PEnd : PChar;
Count : Integer;
begin
Setlength(_Result,length(Text)+Length(Text) div 4);
PSource := @Text;