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

Вниз

Очень туго с СИ   Найти похожие ветки 

 
SPOK   (2006-02-10 12:07) [0]

Подскажите как интерпритировать замечательную надпись на СИ в Pascal
(Delphi)
COLORREF Palette[256]
memset((char*)&Palette,0,255*Sizeof(COLORREF))
ну и желательно разяснить, что имел ввиду автор.


 
begin...end ©   (2006-02-10 12:37) [1]

> Подскажите как интерпритировать замечательную надпись на
> СИ в Pascal

var
 Palette: array [0..255] of COLORREF;
begin
 FillChar(Palette, 255 * sizeof(COLORREF), 0)
end

> ну и желательно разяснить, что имел ввиду автор

Объявление 256-элементного массива структур COLORREF и заполнение нулями первых 255 элементов массива.


 
Don Nikola ©   (2006-02-10 12:46) [2]

На вид простое обнуление палитры, что-то вроде этого:

---
Var
   Palette: array[0..255] of COLORREF;

begin
   FillChar(Palette,256*SizeOf(COLORREF),0);
end;
---


 
Don Nikola ©   (2006-02-10 12:47) [3]

Пока писал, ответили ;) Вот лаги в инете ;))


 
Defunct ©   (2006-02-10 15:44) [4]

> ну и желательно разяснить, что имел ввиду автор.

Очевидно, автор кода допустил ошибку. нет резона создавать массив из 256-ти элементов, а заполнять нулями только 255.



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

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

Наверх




Память: 0.47 MB
Время: 0.052 c
15-1139159811
-san-
2006-02-05 20:16
2006.02.26
SP3 or SP4!!!


2-1139300087
Нулевой
2006-02-07 11:14
2006.02.26
Как перевести компонент с API на Pascal(delphi)?


15-1139253380
Gero
2006-02-06 22:16
2006.02.26
Проверка соответстивия пароля запароленному zip-файлу


10-1114156776
DeStranger
2005-04-22 11:59
2006.02.26
Storage


4-1134078315
spyrytus
2005-12-09 00:45
2006.02.26
Как отследить "Завершение работы".