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

Вниз

Как перевести на Delphi следующую конструкцию:   Найти похожие ветки 

 
Alexander ©   (2002-09-24 10:19) [0]


LPWSTR Datatypes[]={
L"str1",
L"str2",
0};


 
Alexander ©   (2002-09-24 10:27) [1]

а ешё как задать такую константу:

PWCHAR pTabsKey = L"TABS";



 
MBo ©   (2002-09-24 10:28) [2]

const
Datatypes:array[0..2] of PWidechar=("str1","str2",nil);


 
MBo ©   (2002-09-24 10:31) [3]

Или
array[0..2] of WideString=("str1","str2","");

второе -
const ptabskey:PWideChar="TABS";



 
Alexander ©   (2002-09-24 11:52) [4]

а LPTSTR это как я понял PChar?


 
MBo ©   (2002-09-24 12:48) [5]

Да, но там есть какие-то тонкости, о которых C-шники знают


 
Alexander ©   (2002-09-27 14:02) [6]

Хм..., а как можно перевести вот Это?


LPWSTR *pMyDatatypes = Datatypes;
...
while (*pMyDatatypes) {
cbTotal += wcslen(*pMyDatatypes) * sizeof(WCHAR) + sizeof(WCHAR) + sizeof(DATATYPES_INFO_1);
pMyDatatypes++;}



 
Alex4444444444   (2002-09-28 01:06) [7]


pMyDataTypes := @Datatypes;

while Assigned(pMyDataTypes) do begin
cbTotal := cpTotal + ...
Inc(pMyDataTypes);
end;

Not quite sure about the Inc(); it may be

Inc(pMyDataTypes, SizeOf(tMyDataTypes))




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

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

Наверх




Память: 0.48 MB
Время: 0.021 c
3-21394
VladTen
2002-10-17 10:33
2002.11.07
Как узнать Номер версии программы


14-21816
Igorek
2002-10-16 12:29
2002.11.07
А может программистам к власти прийти? ;-)


1-21470
stone
2002-10-28 13:32
2002.11.07
Изменение ширины колонки в TListView


4-21887
Budoudoo
2002-09-26 21:04
2002.11.07
Работа с телефонной линией. Модем.


3-21411
@Ujin
2002-10-18 12:35
2002.11.07
Мастера! Как определить число записей в фильтрованной таблице?