Newsgroup: it.comp.lang.delphi
Titolo: PopupMenu 02 Aiutoooo!

Ciao, chiedo scusa se insisto nella domanda, ma non voglio credere che nessuno riesca a suggerire un consiglio pper questo problema:
In MouseDown
 
var 
C,R: Integer; 
begin 
C:= SG.Col; 
for R:= 1 to SG.RowCount -1 do 
SG.Cells[C,R]:= UpperCase(SG.Cells[R,C]); 
end; 
Questo funziona sia con evento MouseDown che con un PopupMenu, ma formatta tutta la colonna. 
in MouseDown 
var 
Col,Row: Integer; 
begin 
SG.MouseToCell(X,Y,Col,Row); 
SG.Cells[Col,Row]:= UpperCase(SG.Cells[Col,Row]); 
end; 
Questo invece formatta solo sulla cella da me scelta, ma non funziona con PopupMenu. 
Come posso fare? 
Grazie a tutti. 
Ciao! 
-- 
Questo articolo e` stato inviato dal sito web 
http://www.nonsolonews.it

in MouseDown 
var 
Col,Row: Integer; 
begin 
SG.MouseToCell(X,Y,Col,Row); 
SG.Cells[Col,Row]:= UpperCase(SG.Cells[Col,Row]); 
end; 
Devi metterlo nell'evento on drawcell per uppercase temporaneo... Del 
tipo... 
if (SG.Col=ACol)and(SG.Row=Row) then 
    SG.Canvas.TextOut(Rect.Left+2,Rect.Top+2,
                      uppercase(SG1.Cells[ACol,ARow])
oppure nel mouse click per upper case consolidato
C,R : Integer;
if (C=SG.Col)and(R=SG.Row) then begin 
                                SG.Cells[C,R]:=uppercase(SG.Cells[C,R]);
                                SG.Refresh; // Se serve
                                end;
Scusa la domanda ma che c...o di programma stai facendo ?
Ci credo che nessuno ti risponde o sei un troll o sei a un livello basso.
Se sei un troll ti hanno già filtrato, se sei a un livello basso ti 
conviene prendere un libro e studiare, fidati !
--- posted by geoForum on 
http://www.delphiedintorni.it

sorryy ho sbagliato copia e incolla ...
Mouse down:
var C, R : Integer;
C=SG.Col; R:=SG.Row;
SG.Cells[C,R]:=uppercase(SG.Cells[C,R]);
SG.Refresh; // Se serve
--- posted by geoForum on 
http://www.delphiedintorni.it

Grazie per il tempo dedicatomi, io continuerò a studiare Delphi,
ma la soluzione che mi hai dato già l'avevo.
La domanda era:
Il testo contenuto in una qualsiasi cella, deve diventare maiuscolo
cliccando con il destro del mouse, quindi, dopo che ho fato clic su un menù a tendina(PopupMenu).
Spero di essere stato chiaro.
Non sono un Troll.
Non sono neanche un Dio nella programmazione, sto solo chiedendo una mano, credo che sia questo il motivo della comunità.
Almeno spero.
Comunque grazie lo stesso.


 Ciao!
Ciao, Antò.


Caspita, era piů facile di quello che sembrava.
Grazie ad Antň, il fatto č che ho 1000 codici x la testa, e
alla fine le cose piů semplici appaiono piů difficili.
Ti ringrazio per l'aiuto.


Cosě funziona ?



Si, funziona.


Ciao!
Ho fatto dei check up questa mattina funziona DAVVERO !!! ;-)
Ho solo notato dei problemi nella Popup usando il tasto TAB per scorrere 
la lista ! Uso Delphi7 professional anche a te ? Se ti da dei problemi 
che tipo ?
Ciao e buona giornata ;)


Con delphi 8 nessun problema 
Ciao e grazie per il tempo che hai usato per aiutarmi ;-)


 string grid, vedi tu se puň esserti utile...
Antň, č un troll, lascialo perdere.
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

Ciao e grazie per il tempo che hai usato per aiutarmi ;-)
Grazie a te, il problema era capitato a me... Io utilizzo D2006 ma non 
ho riscontrato quel problema
Forse devi togliere la proprietà di ridimensionamento delle colonne !


>Forse devi togliere la proprietà di ridimensionamento delle colonne !
Non basta devi togliere tutti i ridimensionamenti anche quello delle 
righe.
Ciao


Ascolta trollettino, fai il bravino: quando vuoi cantartele e 
suonartele da solo almeno impara a cambiare stile nella scrittura del 
codice.
Come troll hai ancora parecchio da imparare; e ora a cuccia.


Bel Nick, nome e cognome molto serio.... Bravo !
Aspettiamo le domande.
