Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.02.06;
Скачать: CL | DM;

Вниз

Доступ к StringGrid в чужой программе   Найти похожие ветки 

 
maxon   (2004-12-17 19:36) [0]

Здравствуйте мастера.
Имеется такая вот проблема.
В чужой программе есть таблица StringGrid, мне необходимо читать из ячеек данные и посылать туда свои,
как это сделать, дескриптор проги и таблицы узнал, а что дальше делать, неизвестно

var Hnd :HWnd;
   Wh:THandle;
   WinClass: array [0..256] of Char;
begin
Hnd:=FindWindow(nil,pchar(edit1.Text));
if Hnd = 0 then begin
 showmessage("Программа не запущена.");
 exit;
end;
Wh:=GetWindow(Hnd,gw_Child); //ищем дочернее окно - таблицу
while Wh<>0 do begin
  GetClassName(Wh,WinClass,255);
  if WinClass="TStringGrid" then break;
  Wh:=GetWindow(Wh,gw_hWndNext);
end;
end;


 
maxon   (2004-12-19 08:52) [1]

Ответьте плиз. Очень нужен результат



Страницы: 1 вся ветка

Текущий архив: 2005.02.06;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.052 c
9-1099156472
lokid7
2004-10-30 21:14
2005.02.06
Сокобан


14-1105705970
Fay
2005-01-14 15:32
2005.02.06
Работа


4-1102999051
Stepan
2004-12-14 07:37
2005.02.06
Как заставить одну из форм висеть поверх всех окон Windows ?


1-1106317212
BFG9k
2005-01-21 17:20
2005.02.06
Событие изменения ширины колонки в TStringGrid


6-1101321396
Ken
2004-11-24 21:36
2005.02.06
Событие, извещающее о приходе данных в ClientSocket