Zrobiłem przeglądarkę internetową wczytującą skórki. Jest w niej możliwość włączenia i wyłączenia ramki(tej z windowsa). I jest taki problem. Dałem w menu opcję pełnego ekranu. Oczywiście nie użyłem webbrowser1.fullscreen=true bo to nie działa. po wybraniu tej opcji jest coś takiego:
procedure TForm1.Pelnyekran1Click(Sender: TObject);
begin
if BorderStyle=bsNone then
begin
ramka:=False;
end;
if BorderStyle=bsSizeable then
begin
ramka:=True;
BorderStyle:=bsNone;
end;
if WindowState=wsMaximized then
maksymokna:=True;
if WindowState=wsNormal then
maksymokna:=False;
maksymalizacja:=1;
WindowState:=wsMaximized;
PanelOpcji.Width:=ClientWidth;
PanelOpcji.Visible:=True;
PanelOpcji.Height:=1;
Edit1.Width:=ClientWidth-300;
Button1.Left:=Edit1.Left+Edit1.Width;
Button2.Left:=ClientWidth-Button2.Width;
fullScreen:=True; // - to nie odnosi się do WB. Dałem to jako boolean bo jest mi potrzebne.
end;
i problem jest taki, że jeśli ramka była widoczna to w trybie pełnoekranowym powinna zniknąć. Ale jeśli wcześniej była aktywna to strona w WB zostaje wyczyszczona, zatrzymana i znika. Czemu tak jest?
// Używaj tagów <code class="delphi"></code>
i wcięć w kodzie! - Q</delphi>