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

Вниз

Кто-нибудь знает что мне выдает функция EnumProps   Найти похожие ветки 

 
AlexandrH ©   (2001-12-06 14:26) [0]

Хочу получить список свойств окна.
Делаю так.

procedure TForm1.Button1Click(Sender: TObject);
begin
EnumProps(Handle,@PROC);
end;

function PROC (WND: hwnd; PSTR: String; HData: hwnd) : boolean; stdcall;
begin
Form1.ListBox1.Items.Add(pstr);
PROC := True;
end;



В листбокс она мне выдает три строки
типа
ControlOfs000...
Delphi00000344
CC32Subclassinfo

Что то на свойства не похоже. Может я делаю что-то не так..
Подскажите если кто знает..
Заранее благодарен.


 
Digitman ©   (2001-12-06 14:55) [1]

это - из хэлпа :

BOOL CALLBACK PropEnumProc(

HWND hwnd, // handle to window whose property list is being enumerated
LPCTSTR lpszString, // string component of property
HANDLE hData // data handle component of property
);

function PROC (WND: hwnd; PSTR: PChar; HData: hwnd) : boolean; stdcall;
begin
Form1.ListBox1.Items.Add( string(pstr));
PROC := True;
end;

LPCTSTR - это PChar(PAnsiChar), а не String


 
Юрий Зотов ©   (2001-12-06 15:41) [2]

> AlexandrH © (06.12.01 14:26)

Похоже, Вы путаете свойства окон Windows и свойства форм Delphi. Это совершенно разные вещи.


 
AlexandrH ©   (2001-12-07 06:28) [3]

Хорошо попробуем не Delphi_скую форму
делаю так


procedure TForm1.Button1Click(Sender: TObject);
var
h: HWND;
begin
h := Findwindow("TWINDOWSCMD",nil);
EnumProps(h,@PROC);
end;

function PROC (WND: hwnd; PSTR: PChar; HData: hwnd) : boolean; stdcall;
begin
Form1.Memo1.Lines.Add(pstr);
PROC := True;
end;


Выдает не лучше первого 4 строки

ControlOfs00400000000003C0
Delphi00000114
OleDropTargetInterface
OleDropTargetMarshalHwnd

Что это ни как не пойму.....


 
Digitman ©   (2001-12-07 08:01) [4]

>AlexandrH
Ок. А что ты ожижал увидеть среди перечисленных св-в ?


 
troits ©   (2001-12-07 10:52) [5]

>AlexandrH
Почитайте API Help. Раздел Window Property Functions.
В кратце, к каждому окну можно добавить некоторое свойство, которое
идентифицируется строкой и handle(любая, какая тебе нравится, информация. Потом это окно можно будет по этим свойствам идентифицировать, и т. д.). См. SetProp. EnumProps позволяет просто перебрать эти свойства. Так что установка этох свойств - личное дело каждого приложения.

К слову, Windows Commander написан на Delphi.





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

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

Наверх




Память: 0.48 MB
Время: 0.01 c
1-8860
$hade
2002-01-21 13:07
2002.02.04
CASE-средства


14-8992
fliz
2001-12-14 18:33
2002.02.04
---|Ветка была без названия|---


3-8767
Fareader
2002-01-03 15:47
2002.02.04
Тормозит программа под IB 6


1-8955
егор
2002-01-18 20:54
2002.02.04
Вопрос


1-8811
Алиса
2002-01-18 16:59
2002.02.04
Excel+Delphi