Legfrissebb anyagok
PROHARDVER! témák
- Milyen alaplapot vegyek?
- Milyen Android TV boxot vegyek?
- Rendkívül ütőképesnek tűnik az újragondolt Apple tv
- Az előírások megszegése miatt éghet le egyes alaplapokon a Socket AM5 foglalat
- Kormányok / autós szimulátorok topikja
- Kettő együtt: Radeon RX 9070 és 9070 XT tesztje
- Milyen asztali (teljes vagy fél-) gépet vegyek?
- Dobta az OLED kijelzőt a Honor MagicPad 3
- Akciókamerák
- Indulhat a hardverparti!
Mobilarena témák
IT café témák
Keresés
Új hozzászólás Aktív témák
-
Alan
aktív tag
lao ce, rég ''láttalak''
Bocsáss meg, hogy belefirkálok a programodba, de szerintem kicsit szebben így nézne ki:
const
szoveg = '11,10,09,08';
var
szamlalo : integer;
szamlalo := 1;
with Form1 do
for i := 0 to ComponentCount-1 do
begin
if Components i is TEdit
then
begin
(Components i as TEdit).Text := Copy(szoveg, szamlalo, 2);
szamlalo := szamlalo + 3;
end
end;
Ebből most már csak az hiányzik, hogy kizárólag a mi kinevezett szerkesztőmezőinkbe töltsön adatot, és így más mezőket is fel lehessen tenni az ablakra.
[Szerkesztve]
Új hozzászólás Aktív témák
Aktív témák
Új fizetett hirdetések
Üzleti előfizetők hirdetései
- Fujitsu LIFEBOOK E449 i5-8250U 8GB 256GB 14" FHD 1 év garancia
- Telefon felvásárlás!! Samsung Galaxy A50/Samsung Galaxy A51/Samsung Galaxy A52/Samsung Galaxy A53
- Felsőkategóriás merev csöves Gamer PC-Számítógép! I9 11900K / RTX 3090 24GB / 64GB DDR4 / 1TB SSD
- LG 27GR83Q-B - 27" IPS / QHD 2K / 240Hz & 1ms / NVIDIA G-Sync / FreeSync / DisplayHDR 400
- Xiaomi Redmi 13 128GB Kártyafüggetlen 1Év Garanciával
Állásajánlatok
Cég: FOTC
Város: Budapest