Pozycja kursora w StringGrid

0

W jaki sposób określić pozycję kursora tekstowego w edytowanej komórce komponentu StringGrid (w trybie edycji)???
Próbowałem coś znaleźć przez analogię do RichEdit, ale guzik :(

0

Zajrzyj do FAQ dałem tam gotową funkcję

procedure SetStringGridCursorPos(SG:TWinControl;cur_pos:Integer);
var
  Wnd:Integer;
begin
  Wnd:=GetWindow(SG.Handle,GW_CHILD);
  SendMessage(Wnd,EM_SETSEL,cur_pos,cur_pos);
  SG.SetFocus;
end;
function GetStringGridCursorPos(SG:TWinControl):Integer;
var
  Wnd:Integer;
begin
  Wnd:=GetWindow(SG.Handle,GW_CHILD);
  SendMessage(Wnd,EM_GETSEL,Integer(@Result),0);
end; 
0

BIG THX!!!

1 użytkowników online, w tym zalogowanych: 0, gości: 1