Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Algorithmen, Datenstrukturen und Klassendesign (https://www.delphipraxis.net/78-algorithmen-datenstrukturen-und-klassendesign/)
-   -   String zum String addieren (https://www.delphipraxis.net/166028-string-zum-string-addieren.html)

Popov 26. Jan 2012 12:31

String zum String addieren
 
Eigentlich ein triviales Problem, aber anscheinend befinde ich mich inzwischen im Wald und kann vor lauter Bäume... usw.

Ich muss an einen String einen weiteren String anfügen, also ein einfaches
Delphi-Quellcode:
s := s + 'x';


Das Problem ist, dass es sich bei dem String um Memo.Lines handelt und ein
Delphi-Quellcode:
Memo.Lines[x] := Memo-Lines[x] + 'x';
zum flackern des Inhalts führt.

Wer es testen will, ein einfaches Beispiel:

Delphi-Quellcode:
procedure TForm1.Timer1Timer(Sender: TObject);
begin
  Memo1.Lines[0] := Memo1.Lines[0] + 'x';
end;

procedure TForm1.FormCreate(Sender: TObject);
var
  i: Integer;
begin
  for i := 0 to 10 do Memo1.Lines.Add('Einfacher Fülltext');

  Timer1.Interval := 10;
end;
Auf jeden Fall fällt mir hier keine bessere Mehhode Lines zu ergänzen und ein BeginUpdate ist mir bei Memo auch nicht bekannt.

Sir Rufo 26. Jan 2012 12:32

AW: String zum String addieren
 
Delphi-Quellcode:
Memo1.Lines.BeginUpdate;
try
  ...
finally
  Memo1.Lines.EndUpdate;
end;

Popov 26. Jan 2012 13:01

AW: String zum String addieren
 
Jetzt wird es mir aber wirklich ganz anders. Ich habe an die x-mal die Komponente nach einem BeginUpdate und EndUpdate durchsucht und x-mal nichts gefunden.

Das sind die Momente wo ich mich frage ob ich mich in einer The Truman Show befinde und man Spielchen mir mir spielt. So blind kann doch keiner sein. Ich weiß, dass andere Komponenten es haben, gucke in TStrings mehrmals nach und sehe es nicht. Entweder ich befinde mich in The Truman Show und einer hat es eben eingefügt oder ich muss zum Psychiater.

Achso, danke :(

Sir Rufo 26. Jan 2012 13:05

AW: String zum String addieren
 
ich mache das immer so Delphi-Referenz durchsuchenBeginUpdate (5. Treffer ;) )

Popov 26. Jan 2012 13:14

AW: String zum String addieren
 
Ok, ganz neu ist Delphi für mich nicht - auch wenn da Pausen dazwischen sind - und wenn ich mit einer Komponente oder Klasse arbeite und eine Eigenschaft benötige, dann studiere ich sie bevor ich frage. Vielleicht dachte ich TStrings zu kennen, und es deshalb unbewusst übersehen.

Sir Rufo 26. Jan 2012 13:18

AW: String zum String addieren
 
Zitat:

Zitat von Popov (Beitrag 1147773)
Ok, ganz neu ist Delphi für mich nicht - auch wenn da Pausen dazwischen sind - und wenn ich mit einer Komponente oder Klasse arbeite und eine Eigenschaft benötige, dann studiere ich sie bevor ich frage. Vielleicht dachte ich TStrings zu kennen, und es deshalb unbewusst übersehen.

Du erwähntest ja schon das mit dem Wald und den Bäumen ... das geht aber jedem wohl mal so :)

Aphton 26. Jan 2012 14:39

AW: String zum String addieren
 
[OT]
Nicht Chuck Norris; vor lauter Chucks kann der Wald Norris nicht sehen!
[/OT]


Alle Zeitangaben in WEZ +1. Es ist jetzt 18:55 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz