S
SINGLBOY
Unregistered / Unconfirmed
GUEST, unregistred user!
我的程序在98下开发，用户在2000下无法使用，在2000下编译时发现错误在下面的函数里：
为什么红色的那段有问题？
代码:
procedure TForm1.CreateParams(var Params: TCreateParams);
begin
; inherited CreateParams(Params);
; Params.WndParent := (Owner as TForm).Handle;
; Params.Style := WS_CHILD or WS_CLIPSIBLINGS;
[red]Params.ExStyle:=WS_EX_MDICHILD;[/red] ;//这句话在98下无事，在2000下有问题
; Params.Width:=371;
; Params.Height:=108;
; Params.X := 294;
; Params.Y := 0;
end;