Я написал код с помощью Delphi 2009 и обновил свой CodeGear Delphi до XE2. Он отлично скомпилировался с Delphi 2009, но теперь это не так! Вместо этого он дает мне эту ошибку:
[Ошибка DCC] Несовместимые типы: TFormStyle и TTeeFontStyle! Я попытался создать новое приложение Vcl Forms Application и написал команду, которая генерирует эту ошибку:
Form1.FormStyle := FsNormal;
и он скомпилирован отлично, я не знаю, почему это происходит, хотя я считаю, что с моим синтаксисом все в порядке, пожалуйста, помогите, спасибо. Это код, который не компилируется:
procedure TForm1.ApplicationEvents1Message(var Msg: tagMSG;
var Handled: Boolean);
begin
begin
KeyPreview := True;
case Msg.message of
WM_KEYDOWN:
if Msg.wParam = 27 then
begin
form1.Menu:=mainmenu1;
fullscreen1.Checked:=false;
form1.formstyle:=fsnormal;
form1.BorderStyle:=bssizeable;
end
else
if msg.wParam=VK_f5 then
begin
browser.Navigate(memo2.Text);
end;
end;
end;
end;