Собственно простенький код, реагирование на нажатие кнопки:
Код:
procedure TForm1.btn1Click(Sender: TObject);
var
Flags, TargetFrameName, PostData, Headers: OleVariant;
begin
WebBrowser.Navigate(('res://' + 'Project2' + '/1HTML',
Flags, TargetFrameName, PostData, Headers)
);
end;
Файл с ресурсами подключен, его структура такая:
Код:
1HTML 23 ".\source\1.htm"
2HTML 23 ".\source\2.htm"
Компилятор бросается такими ошибками:
Код:
[Error] test2.pas(86): ')' expected but ',' found
[Error] test2.pas(87): There is no overloaded version of 'Navigate' that can be called with these arguments
Подскажите глупому, где ошибка.
Спасибо