delphi-5

Here is my code: type TForm1 = class(TForm) WebBrowser1: TWebBrowser; Button1: TButton; Button2: TButton; procedure Button1Click(Sender: TObject); procedure Button2Click(Sender: TObject); end; implementation uses ActiveX; procedure TForm1.Button1Click(Sender: TObject); // method 1 var HtmlFile: string; begin HtmlFile := ExtractFilePath(Application.ExeName) + 'test.html'; WebBrowser1.Navigate(HtmlFile); end; procedure LoadHtml(wb: TWebBrowser; HTMLStr: string); var aStream: TMemoryStream; begin wb.Navigate('about:blank'); // reset the webbrowser while wb.ReadyState < READYSTATE_INTERACTIVE do /

i have a window that i want to minimize (to the taskbar), so i call ShowWindow : ShowWindow(Handle, SW_MINIMIZE); Except that rather than minimizing itself (to the taskbar), the window is iconified : The window is unparented: How do i minimize a window to the taskbar? Update: Following some advice from 2002 , i try setting the WS_EX_APPWINDOW window style and/or ensuring the window has no owner: Unfortunately, that changes the behavior of my (Delphi) application because there is now two taskbar icons for my application, rather than one: This, of course, is an artifact of Delphi (5); and

i've been trying to get some modeless forms in my application to appear on the taskbar - taking advantage of the new useful taskbar in Windows 7. There's are many issues with the VCL that need to be undone before a form can exist on the taskbar. But the final issue is that minimizing the form that the VCL has designated the main form causes all windows in the application to vanish. Ten years ago, Peter Below (TeamB) documented these problems , and attempts to work around them. But there are some issues that cannot be solved. The issues run so deep within the VCL itself, that it's effectively

My Question is similar to the idea here: Replacing a component class in delphi . But I need to change a specific component(s) class on demand. Here is some pseudo demo code: unit Unit1; TForm1 = class(TForm) ImageList1: TImageList; ImageList2: TImageList; private ImageList3: TImageList; end; procedure TForm1.FormCreate(Sender: TObject); begin ImageList3 := TImageList.Create(Self); // all instances of TImageList run as usual end; procedure TForm1.Button1Click(Sender: TObject); begin Unit2.MakeSuperImageList(ImageList2); Unit2.MakeSuperImageList(ImageList3); // from now on ONLY ImageList2 and

i'm looking to understand virtual override overload reintroduce when applied to object constructors. Every time i randomly add keywords until the compiler shuts up - and (after 12 years of developing with Delphi) i'd rather know what i'm doing, rather than trying things randomly. Given a hypothetical set of objects: TComputer = class(TObject) public constructor Create(Cup: Integer); virtual; end; TCellPhone = class(TComputer) public constructor Create(Cup: Integer; Teapot: string); virtual; end; TiPhone = class(TCellPhone) public constructor Create(Cup: Integer); override; constructor Create