void __fastcall TForm1::Button1Click(TObject *Sender)
{
CppWebBrowser1->Navigate(WideString("d:\\Projects\\IE\\PageFromFile\\Test.mht"));
}
Как открыть html файл
Какое нужно свойство?
Цитата:
Originally posted by zoh
Я нащёл web brouser в инструментах но он выводит ошибку.
Какое нужно свойство?
Я нащёл web brouser в инструментах но он выводит ошибку.
Какое нужно свойство?
Если так писать, то точно выдаст ошибку !!!
TCppWebBrowser->Navigate(...);
Цитата:
Originally posted by mike
Если так писать, то точно выдаст ошибку !!!
TCppWebBrowser->Navigate(...);
Если так писать, то точно выдаст ошибку !!!
TCppWebBrowser->Navigate(...);
Ну это понятно что есть такая функция а что пишется в (...)
Цитата:
Originally posted by zoh
Ну это понятно что есть такая функция а что пишется в (...)
Ну это понятно что есть такая функция а что пишется в (...)
(file://FileName.html)
Цитата:
Originally posted by GIZMO
(file://FileName.html)
(file://FileName.html)
Всё равно ошибку выдаёт!!!!
Цитата:
Originally posted by zoh
Всё равно ошибку выдаёт!!!!
Всё равно ошибку выдаёт!!!!
Ладно, file:// отменяется, но вот так работает точно:
Код:
Цитата:
Originally posted by GIZMO
Ладно, file:// отменяется, но вот так работает точно:
Ладно, file:// отменяется, но вот так работает точно:
Код:
void __fastcall TForm1::Button1Click(TObject *Sender)
{
CppWebBrowser1->Navigate(WideString("d:\\Projects\\IE\\PageFromFile\\Test.mht"));
}
{
CppWebBrowser1->Navigate(WideString("d:\\Projects\\IE\\PageFromFile\\Test.mht"));
}
Спасибо
На:
void __fastcall TForm1::Load()
{
//Loading
CppWebBrowser1->Navigate(WideString(ComboBox1->Text));
}
void __fastcall TForm1::ComboBox1KeyDown(TObject *Sender, WORD &Key,
TShiftState Shift)
{
// if Enter down...
if (Key == VK_RETURN) Load();
}
//---------------------------------------------------------------------------
void __fastcall TForm1::CppWebBrowser1BeforeNavigate2(TObject *Sender,
LPDISPATCH pDisp, Variant *URL, Variant *Flags,
Variant *TargetFrameName, Variant *PostData, Variant *Headers,
VARIANT_BOOL *Cancel)
{
int Index = ComboBox1->Items->IndexOf(AnsiString(*URL));
if (Index == -1)
{
ComboBox1->Items->Insert(0,AnsiString(*URL));
ComboBox1->ItemIndex = 0;
}
else
ComboBox1->ItemIndex = Index;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::CppWebBrowser1ProgressChange(TObject *Sender,
long Progress, long ProgressMax)
{
if (Progress >0)
StatusBar1->SimpleText = Format("Документ %s прочитано %d Кбайт из %d", ARRAYOFCONST((AnsiString(CppWebBrowser1->LocationName),(int)(Progress / 1024),(int)(ProgressMax / 1024))));
}
//---------------------------------------------------------------------------
void __fastcall TForm1::N2Click(TObject *Sender)
{
if (OpenDialog1->Execute())
ComboBox1->Text = OpenDialog1->FileName;
Load();
}
//---------------------------------------------------------------------------
void __fastcall TForm1::SpeedButton1Click(TObject *Sender)
{
ComboBox1->Text = ComboBox1->Items->Strings[ComboBox1->ItemIndex + 1];
Load();
}
//---------------------------------------------------------------------------
void __fastcall TForm1::SpeedButton2Click(TObject *Sender)
{
ComboBox1->Text = ComboBox1->Items->Strings[ComboBox1->ItemIndex -1];
Load();
}
//---------------------------------------------------------------------------
void __fastcall TForm1::SpeedButton3Click(TObject *Sender)
{
CppWebBrowser1->Refresh();
}
//---------------------------------------------------------------------------
void __fastcall TForm1::SpeedButton4Click(TObject *Sender)
{
CppWebBrowser1->Stop();
}
//---------------------------------------------------------------------------
void __fastcall TForm1::ComboBox1Click(TObject *Sender)
{
Load();
}
//---------------------------------------------------------------------------
void __fastcall TForm1::LiteBrowser1Click(TObject *Sender)
{
Form3->ShowModal();
}
//---------------------------------------------------------------------------
void __fastcall TForm1::SpeedButton5Click(TObject *Sender)
{
ComboBox1->Items->LoadFromFile("HomePage.dll");
ComboBox1->Text = ComboBox1->Items->Strings[ComboBox1->ItemIndex + 1];
Load();
}