Форум: "WinAPI";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.01.14;
Скачать: [xml.tar.bz2];




Вниз

ListView_GetItemCount , ListView_GetItemText 


YUS   (2001-11-14 20:08) [0]

Мастера,подскажите почему выдает ошибку?Что я неправильно понял в этих функциях?

uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls;
procedure TForm1.Button1Click(Sender: TObject);
var
hwnd:THandle; //хэндл окна управления рабоч.столом
nItems:cardinal; //номер ярлыка
p:TPoint; buf: array [0..127] of char;
begin
nItems:=ListView_GetItemCount(hwnd);
ListView_GetItemPosition(hwnd,nItem,p);
ListView_GetItemText(hwnd,nItem,0,buffer,sizeof(buffer));
end;



Mbo   (2001-11-15 07:00) [1]

ну если исправить ошибки, то по крайней мере компилируется
uses ...commctrl;
var nItem,nItems

В GetITemCount чего надо получить - nItems или nItem
вместо buffer - buf, как объявлено



YUS   (2001-11-15 07:13) [2]

С buffer и nItems я лоханулся писал уже ночью и не проверил а за модуль
uses ...commctrl; БОЛЬШОЕ СПАСИБО.




Форум: "WinAPI";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.01.14;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.71 MB
Время: 0.016 c
4-42633           exchoper              2001-10-11 15:33  2002.01.14  
STAY ON TOP


3-42380           bk                    2001-12-10 14:25  2002.01.14  
Ms Outlook


1-42449           Mitrofan              2001-12-24 19:28  2002.01.14  
Быстрое преобразование Фурье


1-42411           Bar                   2001-12-25 20:34  2002.01.14  
GetVolumeInformation неодинаково ведет себя под 98/Me и NT


7-42588           Tune                  2001-09-30 14:33  2002.01.14  
Мастера, подскажите как прочитать заголовок файла, чтобы можно было править отдельные биты?