Einzelnen Beitrag anzeigen

Benutzerbild von yankee
yankee

Registriert seit: 10. Mär 2004
1.134 Beiträge
 
Lazarus
 
#8

Re: Performancefrage: Viele Änderungen an einem string

  Alt 4. Mär 2007, 15:18
mhh... ist doch alles nicht ganz einfach....
Der Buffer soll sich ja auch noch vergössern, sobald er voll ist. Was halted ihr hiervon:
Delphi-Quellcode:
var buffer: string;
    bufcur,bufend: PChar;
begin
  setlength(buffer, 31);
  bufcur :=@buffer[0];
  bufend :=@buffer[30];
  while someCondition do
  begin
    if bufcur =bufend then
    begin
      setlength(buffer, length(buffer)+10);
      bufend :=@buffer[length(buffer)-1];
      bufcur :=@buffer[length(buffer)-11];
    end;
    bufcur^ :='A';
    inc(bufcur);
  end;
end;
Letzter Tipp: Drogen. Machen zwar nicht glücklich, geben einem aber wenigstens das Gefühl glücklich zu sein.

Have a lot of fun!
  Mit Zitat antworten Zitat