Guten Tag,
ich würde gerne an die aktuelle Cursorposition in meinem Memofeld einen Text einfügen.
Das habe ich an vielen Punkten im Internet gefunden:
Mein "Textschnipsel" erscheint nun an der korrekten Stelle.
Wenn ich wieder weiter ins Feld schreibe, verschwindet mein "Textschnipsel" wieder und der vorige Zusctand wird wieder sichtbar.
Wenn ich jetzt das Memofeld gleich speichere oder andererseits verwende, ist die Zeichenkette noch drin.
Mir ist auch aufgefallen, daß nach ..Button2Click auch kein Cursor mehr im Memofeld zu sehen ist.
Wo ist der Haken?
Vielen Dank
jrx
Lazarus 0.9.28 r21921 FPC 2.2.4 i386-win32-win32/win64
ich würde gerne an die aktuelle Cursorposition in meinem Memofeld einen Text einfügen.
Das habe ich an vielen Punkten im Internet gefunden:
Code:
procedure TForm1.Button2Click(Sender: TObject);
begin
Memo1.SelLength:=0;
Memo1.SelText:='Textschnipsel';
end;
Mein "Textschnipsel" erscheint nun an der korrekten Stelle.
Wenn ich wieder weiter ins Feld schreibe, verschwindet mein "Textschnipsel" wieder und der vorige Zusctand wird wieder sichtbar.
Wenn ich jetzt das Memofeld gleich speichere oder andererseits verwende, ist die Zeichenkette noch drin.
Mir ist auch aufgefallen, daß nach ..Button2Click auch kein Cursor mehr im Memofeld zu sehen ist.
Wo ist der Haken?
Vielen Dank
jrx
Lazarus 0.9.28 r21921 FPC 2.2.4 i386-win32-win32/win64