Создаю свой компонент наследник TWinControl, перегружаю функцию CreateWindowHandle так:
WindowHandle := CreateWindowExW(ExStyle, WinClassName,
'', Style, X, Y, Width, Height, WndParent, 0, WindowClass.hInstance, Param);

На форму компонент кидается нормально, а вот при закрытии формы вылетает с ошибкой
Invalid Window Handle: 1400
Что ему не нравиться?

Здравствуйте, santaxxl, Вы писали:

S>Создаю свой компонент наследник TWinControl, перегружаю функцию CreateWindowHandle так:
S>WindowHandle := CreateWindowExW(ExStyle, WinClassName,
S> '', Style, X, Y, Width, Height, WndParent, 0, WindowClass.hInstance, Param);

S>На форму компонент кидается нормально, а вот при закрытии формы вылетает с ошибкой
S>Invalid Window Handle: 1400
S>Что ему не нравиться?

Абалдеть
Что же ты такое делаеш? Просто CreateParams перекрыть тебе было мало?
Да и чем поданый тобой код отличается от TWinControl.CreateWindowHandle? Насколько я помню, он неплохо работатет

procedure TWinControl.CreateWindowHandle(const Params: TCreateParams);
begin
  with Params do
    FHandle := CreateWindowEx(ExStyle, WinClassName, Caption, Style,
      X, Y, Width, Height, WndParent, 0, WindowClass.hInstance, Param);
end;

Хотя я не понял зачем ты тут используеш unicode версию CreateWindowEx — CreateWindowExW

D>Хотя я не понял зачем ты тут используеш unicode версию CreateWindowEx — CreateWindowExW

Именно для этого я и перекрываю эту функцию! Если через CreateParams можно задать какие-либо флаги, для того чтобы создавалось юникодовое окно- буду только рад

А вопрос в том- как правельно перекрывать фцнкцию CreateWindowHandle наследника TWinControl,для создания постейшего например EDIT-а!

Здравствуйте, santaxxl, Вы писали:

D>>Хотя я не понял зачем ты тут используеш unicode версию CreateWindowEx — CreateWindowExW

S>Именно для этого я и перекрываю эту функцию! Если через CreateParams можно задать какие-либо флаги, для того чтобы создавалось юникодовое окно- буду только рад

S>А вопрос в том- как правельно перекрывать фцнкцию CreateWindowHandle наследника TWinControl,для создания постейшего например EDIT-а!

Смотри что я нарыл просто поискав в интернете за 5 минут: TntWare Delphi Unicode Controls

Скачай себе исходники и посмотри что к чему.
Удачи!