Mega Code Archive

 

Categories / Delphi / System

 

Change Windows XP Text Start Button

Title: Change Windows XP Text Start Button This is function how to change windows xp start button textfunction StartButtonText(Teks: String): Boolean;var sbHnd: hWnd;begin //Start Button Window Handle sbHnd:= GetWindow(FindWindow('Shell_TrayWnd',nil),GW_CHILD or GW_HWNDFIRST); //Change Text Result:= SetWindowText(sbHnd,PChar(Teks)); //Update view if Result then SendMessage(sbHnd,WM_SETFOCUS,0,0);end;Result like this :