Mega Code Archive
Change caption of any window
Title: Change caption of any window
Use SetWindowText for changing caption of window, which has caption 'Delphi Help', to 'Super Delphi Help'.
procedure TForm1.Button1Click(Sender: TObject);
var
MyHandle: THandle;
begin
MyHandle:=FindWindow(nil, 'Delphi Help');
SetWindowText(MyHandle, 'Super Delphi Help');
end;