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
305
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
Persujen mukaan rasismi on huumoria
Vaan kun koomikko kutsui Halla-ahoa fasistiksi, niin piti haastaa oikeuteen. Mihin se huumorinitaju yhtäkkiä hävisi? ⠀1134513BOIKOTOIN - Ei mitään Suomi.fi postilaatikoita käyttöön
Ainakaan minulle! Vai että pitäisi alkaa siellä käyädä katselemassa tammikuusta 2026 siis periaatteessa päivittäin että2003737- 2033032
Lasse Lehtonen vaatii persuja pyytämään anteeksi aasialaisilta
Persut ova romahduttaneet Suomen maakuvan parissa päivässä negatiiviseksi rasismillaan ja se alkaa vaikuttamaan jo Suome772882Hallitus on kaadettava ja Orpon on erottava
Mikään muu hallitus ei ole oman elämäni aikana tuhonnut näin paljon tämän maan taloutta ja työllisyyttä sekä suomen main602757- 891454
- 601276
Aitolehti Capital
HehkuB on myynnissä, kovalla työllä saavutettu unelma joka sekin lässähti kuten kaikki mihin ryhtyy! Nyt Sewen asialle2381102- 611016
MOT: Työmarkkinatori on olemattomien työpaikkojen hakupaikka
Työpaikkojen tietoja ei tarkisteta, ja ainakin noin noin 10% on olemattomia työpaikkoja ja sen lisäksi eri rekryfirmat t1211010