TRichEdit

[night]

Ihr werdet mich für verrückt halten, aber wie heißt der blinkende Strich, der anzeigt, wo der Text geschrieben wird? Kann man den Steuern? Ich kann mich an Pascal erinnern, da gab es die Funktion gotoxy. Ist sowas auch hier machbar?

mfg night

[marabu]

Hallo,

du meinst die Schreibmarke (Caret) und steuerst sie z.B. über eine Zuweisung an RichEdit.CaretPos.

Grüße vom marabu

[night]

Danke genau das habe ich gesucht.

Kann man an dieser Position auch Text ausgeben? MIt Lines.add trage ich immer in eine neue Zeile ein.

Wenn ich stehen habe:

abc dann möchte ich daraus
abcdef machen zB.

mfg night

[marabu]

Ja, du kannst dort auch Text ausgeben:

Delphi-Quellcode:

procedure TDemoForm.ButtonClick(Sender: TObject);
var
  iFound: Integer;
begin
  with RichEdit do
  begin
    iFound := FindText(FindEdit.Text, 0, MaxInt, []);
    if iFound > -1 then
    begin
      SelStart := iFound;
      SelLength := Length(FindEdit.Text);
      SelText := ReplaceEdit.Text;
    end;
  end;
end;

Getippt und nicht getestet.

Freundliche Grüße

[Blackheart]

Oder

Delphi-Quellcode:

RichEdit.SelText:=MyString;

:wink: