Forum: Sonstige Fragen zu Delphi
Delphi
by Matze,
27. Aug 2003
Mit dem Code kann man nicht mal mehr copy&Paste machen. :(
Forum: Sonstige Fragen zu Delphi
Delphi
by Matze,
27. Aug 2003
procedure TForm1.RichEdit1KeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if key=vk_return then
RichEdit1.Lines.Exchange(0,RichEdit1.CaretPos.Y);
RichEdit1.Lines.Strings:=RichEdit1.Lines.Strings+'
';
end;
Forum: Sonstige Fragen zu Delphi
Delphi
by Matze,
27. Aug 2003
Wenn ich das so schreibe:
RichEdit1.Lines.Exchange(0,RichEdit1.CaretPos.Y);
RichEdit1.Lines.Strings:='
';
dann wird die ganze Zeile durch "
" ersetzt! :(
Forum: Sonstige Fragen zu Delphi
Delphi
by Matze,
27. Aug 2003
Dann kommt bei:
RichEdit1.Lines.Exchange(0,RichEdit1.CaretPos);
Diese Fehlermeldung:
Trotzdem Danke!
Forum: Sonstige Fragen zu Delphi
Delphi
by Matze,
27. Aug 2003
Hi!
Ja, die Überschrift sagt es schon. Wie bekomme ich den integer-Wert der Zeile, indem sich der Cursor des RichEdit befindet?
Ich möchte folgendes machen:
Sobald ich im RichEdit auf Enter drücke, dann soll der Cursor in die neue Zeile springen und in dieser neuen Zeile etwas einfügen.
Das könnte ich dann mit:
RichEdit1.Lines.Exchange(0,Zeile);