Backstep senden mit PostMessage

[turboPASCAL]

Lass dir mal den Text anzeigen, ob überhaubt etwas enthalten ist...

Delphi-Quellcode:

begin
  //..
  h := GetFocusedControl;
  SeekRecord(stringgrid1,[1],[edit1.text]);
  richedit1.Text:= stringgrid1.Cells[0,stringgrid1.row];
  K:=length(richedit1.text);

  ShowMessage(richedit1.Text); // <----<<<

  richedit1.SelectAll;
  richedit1.CopyToClipboard;

  PostMessage(hwnd,wm_paste,0,0); // <---<<<
  
  //..

:arrow: Neue Frage -> neuer Thread. Und verwende bitte Tag's (Tastenkombi für delphicode [ALT+ d])

[lotte]

- in showmessage wird die richtige listenzeile ausgewählt;
- über STRG+V wird auch die richtige Zeile übernommen in das Fenster,
- aber nicht automatisch mit postmessage eingefügt!!

:cat:

[turboPASCAL]

Zitat:

Zitat von turboPASCAL

:arrow: Neue Frage -> neuer Thread.