User108 писал(а):
а здесь случайно не пропущено что-то после thenА тэги-то форумовские (color) вот тут убрал?
function THIMainForm._onMessage;
begin
case Msg.message of
WM_COPYDATA: _hi_OnEvent(_event_OnCopyData,Msg.LParam);
[color]MM_WIM_DATA: _hi_OnEvent(_event_OnWimData{,Msg.lParam});
MM_WOM_DONE: _hi_OnEvent(_event_OnWomData{,Msg.wParam});[/color]
WM_ACTIVATE:
if Msg.WParam > 0 then
begin
case Msg.message of
WM_COPYDATA: _hi_OnEvent(_event_OnCopyData,Msg.LParam);
[color]MM_WIM_DATA: _hi_OnEvent(_event_OnWimData{,Msg.lParam});
MM_WOM_DONE: _hi_OnEvent(_event_OnWomData{,Msg.wParam});[/color]
WM_ACTIVATE:
if Msg.WParam > 0 then
[size=-2]------ Добавлено в 17:09
Galkov писал(а):
а какой цвет тв ожидал увидеть, кстати ???Видимо просто цвет Вот есть-же чёрно-белые телевизоры, а есть цветные