Miksi tuo koodinpätkä ei muuta comboboxin itemsien nimien alkukirjaimia isoiksi?
Koodi:
procedure TForm1.ComboBoxEx1KeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
var
x,i : integer;
kirjain : string;
begin
for x := 0 to ComboBoxEx1.ItemsEx.Count -1 do
begin
kirjain := UpperCase(ComboBoxEx1.ItemsEx[x].Caption[1]);
kirjain := ComboBoxEx1.ItemsEx[x].caption[1];
end;
ComboboxEx aloittelijan ongelma
d6x
2
303
Vastaukset
- dlp
begin
ComboBoxEx1.ItemsEx[x].caption := UpperCase(ComboBoxEx1.ItemsEx[x].Caption[1]) copy(ComboBoxEx1.ItemsEx[x].Caption,2,maxint);
end; - zs0
var
i: integer;
s: string;
begin
for i := 0 to ComboBoxEx1.Items.Count-1 do
begin
s := ComboBoxEx1.ItemsEx[i].Caption;
s[1] := UpperCase(s)[1];
ComboBoxEx1.ItemsEx[i].Caption := s;
end;
end;
Ketjusta on poistettu 0 sääntöjenvastaista viestiä.
Luetuimmat keskustelut
Persuja ei aluevaltuustoissa näy
Ei tunnu persuja paljon paikalliset asiat kiinnostavan, vaan ainoastaan ulkomaalaiset, joku Israel ja Trumpin fanitus.913942Päivän Riikka: Uudenkaupungin autotehdas hiljeni
Näin ne 100 000 uutta pysyvää ei-tempputyötä yksityiselle sektorille tämän hallituksen ansiosta syntyy. Työntekijöille j973307Riikka vie Suomen kohta ykköseksi työttömyyskisassa
Espanja: 10,5 % Suomi: 10,3 % Ruotsi: 9,3 % Kisa on tiukkaa, mutta Riikalla hyvä draivi päällä. Vasemmistolaisen päämin1252617Miten juhlitte ensi lauantaina?
Se on kalenteriin merkitty juhlapäiväksi, niin sitä kai kuuluu juhlia.2071938Mikä ihme teitä savolaisia tuossa
p*rs*reiässä niin kiinnostelee? Että siitä pitää päntönnään huutaa.201774Laita tunniste josta kaivattusi tietää sun kirjoittavan täällä
Joku yksilöity yhteinen juttu joka on sun ja kaivattusi välillä. Tuntomerkkinä esim. punainen pipopää, tonttu-ukko tai m801675Varusmiehen kuolema
Ei ollut vahinko, ei aiheuttanut vaaraa muille, eikä ollut rikos, mitä jää jäljelle? Oliko kyseessä oman käden kautta lä951668- 1101529
Kumpaan rahat, mummojen vaippoihin vai Nalle WahIroosille?
JOS siis sinä saisit päättää?11291- 571192