Mega Code Archive

 

Categories / Delphi / Examples

 

Change the caption of other applications

Title: change the caption of other applications? { If you want to change caption of other runnung application try this command: } procedure TForm1.Button1Click(Sender: TObject); begin SetWindowText(FindWindow('notepad', nil), 'Hello!'); // or: SendMessage(FindWindow('notepad', nil), WM_SETTEXT, 0, Integer(PChar('Hello!'))); end;