TDBMemo Eingabeproblem

[mansch]

Hallo,
ich brauche Hilfe bei einem seltsamen Verhalten der TDBMemo-Komponente. Mein Ziel ist es, in ein Memofeld eine Zeile einzufügen und dann den Cursor dahinter zu setzen, um weiter Angaben machen zu können.
Mit einer einfachen MemoKomponente funktioniert das einwandfrei:
procedure TForm1.Button3Click(Sender: TObject);
begin
with Memo1 do begin
Lines.Insert(0,'blablabla');
SelStart := 10; SelLength := 0;
SetFocus;
end;
end;

Da das Ergebnis aber in einer Tabelle gespeichert werden soll, benutze ich eine TDBMemo-Komponente. Und jetzt passiert folgendes: Sobald ich eine Zeile einfügen will, also die Eingabetaste drücke, verschwindet die eingefügte Zeile (hier: 'blablabla'), manchmal auch bei andere Zeichen.
Ich arbeite mit Lazarus 1.8.4 und habe zu obigem Test das SQLite3Dataset verwendet. Mit ZEOS gab es dasselbe Problem, so dass ich die Komponente im Verdacht habe. Hat jemand einen Lösungshinweis. Dann möchte ich mich jetzt schon bedanken.

Manfred

[willi4willi]

Sieht es besser aus, wenn Du soetwas machst:

Code: Alles auswählen

 
  with DBMemo1 do begin
    DataSource.DataSet.Edit;
    Lines.Insert(0,'blablabla');
    DataSource.DataSet.Post;
    SelStart := 10; SelLength := 0;
    SetFocus;
  end;
 

??

[mansch]

Danke willi4willi,

das war's!

Manfred