Скачать: CL | DM;

Инициализация переменных   Найти похожие ветки 

← →
jack128 ©   (2003-09-02 19:11) [0]

День добрый
Такой вот вопрос
При попытке иницализировать переменную

type
TTransferApiFunc = function (Handle : THandle; Buffer : Pointer;
BufferSize : Cardinal; var TransferedBytes : Cardinal;
lpOverlapped: POverlapped): BOOL; stdcall;
TTransferType = (ttRead, ttWrite);
var
FuncArr : array [TTransferType] of TTransferApiFunc =
(@ReadFile,@WriteFile);

возникает ошибка (копиляции)"Constant expression expected",
в то ж время в модуле Forms видим

var
UtilWindowClass: TWndClass = (
style: 0;
lpfnWndProc: @DefWindowProc;
cbClsExtra: 0;
cbWndExtra: 0;
hInstance: 0;
hIcon: 0;
hCursor: 0;
hbrBackground: 0;
lpszMenuName: nil;
lpszClassName: "TPUtilWindow");
В чем разница? И вообще почему??!!!

---

← →
Andris   (2003-09-02 19:24) [1]

Правильно будет вот так
FuncArr : array [TTransferType] of TTransferApiFunc =
(ReadFile,WriteFile);

а TWndClass.lpfnWndProc - имеет тип Pointer (проследи в windows.pas)

---

← →
jack128 ©   (2003-09-02 19:34) [2]

Блин, туплю..Спасибо

---

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

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.012 c