Forum: Object-Pascal / Delphi-Language
Delphi
by DrUArn,
7. Apr 2015
@Sir Rufo: ja, ist richtig.
Nun habe ich mit BeginUpdate und EndUpdate etwas propbiert, verhindert auch größtenteils das Flackern bei vielfachem Einfärben.
Eine interessante Beobachtung hier noch, die ich nicht erklären kann:
procedure TSimpCellRichEd_UA.SetEditModus(const EdMo: tcelleditmodi);
var s:string;
begin
Forum: Object-Pascal / Delphi-Language
Delphi
by DrUArn,
7. Apr 2015
@Dalei: Danke, Du hast recht! Schreibfehler.
Dann werde ich damit noch ein wenig experimentieren.
Gruß Uwe
Forum: Object-Pascal / Delphi-Language
Delphi
by DrUArn,
7. Apr 2015
Hi, comm,
@ mann mann ... : natürlich schaue ich mir die Hilfen an. Aber nicht jeder versteht wie du alles sofort ....
In den Beispielen der Hilfe finde ich:
procedure TForm1.ComboBox1DropDown(Sender: TObject);
var
I: Integer;
begin
Forum: Object-Pascal / Delphi-Language
Delphi
by DrUArn,
2. Apr 2015
Hi, himitsu
da stehe ich gerade auf dem Schlauch.
BeginUpdate EndUpdate von tstrings ...
meinst du, daß ich die Neudarstellung von lines irgendwie stoppen kann, und erst wenn alles fertig, wieder auf den Schirm werfen?
Grüße
Forum: Object-Pascal / Delphi-Language
Delphi
by DrUArn,
2. Apr 2015
Hhi, Himitsu,
ja, Du hast recht.
Am einfachsten wäre schon Dein Vorschlag:
Procedure DeletelastLinebreak;
var s.string;
begin
//text:=trimright(RichEdit1.text);geht nicht
Forum: Object-Pascal / Delphi-Language
Delphi
by DrUArn,
2. Apr 2015
Hi,
Kommando zurück, so funktioniert's nur bei einzeiligen Texten. Bei trichedit muß man ja auch mit den als 1 gezählten Zeilenvorschüben kämpfen.
Für Operationen am Ende eines Textes ist das aber einfach:
procedure deletelastlinebreakOhneTextNeu;//funktioniert nicht
begin
Forum: Object-Pascal / Delphi-Language
Delphi
by DrUArn,
2. Apr 2015
Hi,
Danke für die schnelle Antwort.
@himitsu: Habe schon geahnt, daß ich mir Prügel abhole. Deinen Worten nach setzt man in einem Null-terminierten String nicht einfach #0, um ihn an einer anderen Stelle zu beenden. Zu trim ..: ich möchte eben eine Neuzuweisung an Richedit1.text verhindern, da dann alle Angaben für diesen Text (Farben, Schrifttyp an und einige andere Berechnungen an diversen...
Forum: Object-Pascal / Delphi-Language
Delphi
by DrUArn,
2. Apr 2015
Hi, comm,
ich möchte in einem Trichedit verhindern, daß am Ende eine linebreak angefügt wird (man also auf der letzten text-Zeile und nicht auf einer Zeile darunter steht).
Beispiel:
richedit.text sieht bei normalem Anhängen von 3 Zeilen mit append so aus: '1'#$D#$A'2'#$D#$A'3'#$D#$A
Der letzte Linefeed soll weg, mglst. OHNE Richedit.text neu zu setzen