hallo,
ich möchte in meinem programm die button captions in einem topendialog ändern.
das mache ich folgendermassen:
Delphi-Quellcode:
procedure TForm1.OpenDialog1Show(Sender: TObject);
begin
SetDlgItemText(GetParent(OpenDialog1.Handle), IDOK, PChar('New &Open'));
SetDlgItemText(GetParent(OpenDialog1.Handle), IDCANCEL, PChar('New &Cancel'));
end;
das funktioniert auch, nur leider wird der dialog unter windows vista/7 nicht mehr im neuen stil dargestellt. er sieht wie in windows xp aus.
das passiert sobald ich im onshow event was mache, jemand ne idee wie man das vermeiden kann.
gruß,
cookie