Newsgroup: it.comp.lang.delphi
Titolo: BorderIcon

E' possibile cambiare la Hint della bordericon close di una form?
Mi spego meglio: fermandosi col puntatore sulla icona [X] di una form, ad
esempio, compare la scritta 'Close'. Qualcuno sa se è possibile modificarla?
Grazie e Buon Anno a tutti.

Se non č possibile si potrebbe mettere showhint=false,
poi con le coordinate del mouse se uno si avvicina far scrivere
qualcos'altro con Canvas...
Basta calcolare le coordinate giuste e si fa tutto...!
--- posted by geoForum on 
http://www.delphiedintorni.it

(Mmmm... non funzionerebbe il get pixel sul bordo)...
Togli tutto il bordo della Form (BorderStyle=none),
poi ce ne disegni sopra uno tu uguale con dei bottoni grafici
opportunamente rifatti, e li metti l'hint che vuoi, con tutti ci controlli
sulla form del caso...
Un po' un casino inutile ma se č vitale e non esiste altro...
Ultima cosa che non si potrebbe fare č entrare nel file compilato e
cercare la scritta chiudi e cambiarla.... (anche se questo la licenza
delphi non credo lo permetta)....


 esempio, compare la scritta 'Close'. Qualcuno sa se è possibile modificarla?
Temo che quel suggerimento sia fornito dal sistema, non da Delphi, 
quindi credo che l'unico modo possibile per disabilitarlo sia interagire 
con il sistema operativo stesso, magari attraverso un hook.
Prova a fare qualche ricerca in merito. Mi dispiace non essere in grado 
di fornire ulteriori informazioni, spunti o idee. :-|
Ciao,
   Marco.
-- 
MARCO BREVEGLIERI
  (
http://www.marco.breveglieri.name
)
     Non hai la possibilità di scaricare Turbo Delphi Explorer?
     Te lo spedisco io!! [
http://www.marco.breveglieri.name/?p=48
]

In realtà come ho già detto sopra è molto semplice...
Prova così, si capisce MEGLIO quanto ti ho detto :
procedure TForm1.Button1Click(Sender: TObject);
var Rect : TRect;
begin
Form1.BorderStyle:=bsNone;
Form1.Canvas.Brush.Color:=clActiveCaption;
Rect.Left:=0; Rect.Right:=Form1.Width;
Rect.Top:=0; Rect.Bottom:=25;
Form1.Canvas.FillRect(Rect);
Rect.Left:=0; Rect.Right:=3;
Rect.Top:=0; Rect.Bottom:=Form1.Height;
Form1.Canvas.FillRect(Rect);
Rect.Left:=Form1.Width-3; Rect.Right:=Form1.Width;
Rect.Top:=0; Rect.Bottom:=Form1.Height;
Form1.Canvas.FillRect(Rect);
Rect.Left:=0; Rect.Right:=Form1.Width;
Rect.Top:=Form1.Height-3; Rect.Bottom:=Form1.Height;
Form1.Canvas.FillRect(Rect);
(*
Poi metti le tre immagini del controllo della FORM
e li metti gli Hint che vuoi. Devi controllare tutto
sul resize della FORM, ma lo fa in automatico ;-)
Poi sui bottoni immagini metti i vari controlli,
free, minimize etc.
*)
end;
Puoi anche fare di meglio, alla fine è tutta grafica.
CIAO !


Non funziona ... Sorry


 Non funziona ... Sorry
Fa nulla. Sei già stato identificato e pertanto non ti rispondo più.


Tutti sanno che sei Valter Buccinà sotto le spoglie di
Matteo Taverna
Mario Benvenuti
Triskell
Aran Agnello etc. etc.
Sinceramente Valter da te non ce l'aspettavamo...
Cioè non conoscevamo il Troll che è in te fino a questo punto.
Senza rancore
Ciao Marco
-- MARCO BREVEGLIERI 
Non hai la possibilità di scaricare Turbo Delphi Explorer o non sei
capace? Te lo spedisco io su floppy !!


 Aran Agnello etc. etc.
...e Croce, tra i nuovi del 2007,  lo hai dimenticato?
Se sei così sprovveduto da postare su D&D come Benvenuti e cinque minuti
dopo ripeterti qui come Croce cambia mestiere, quello di Troll non ti si
addice.
Valter