Legfrissebb anyagok
PROHARDVER! témák
Mobilarena témák
IT café témák
Új hozzászólás Aktív témák
-
killerjohn
addikt
Ez nem fog menni, mivel ciklusváltozó nem lehet, csak lokális...
Így már jobb :
Var Tomb : array [0..3] of String = ('Edit1','Edit2','Edit3','Edit4');
Procedure TForm1.Button1Click(Sender: TObject);
Var i1 : Integer;
Begin
For i1 := 0 To 3 Do
Begin
(FindComponent(Tomb[i1]) as TEdit).Text := 'Akármi';
End;
End;
[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
- REFURBISHED és ÚJ - Lenovo ThinkPad Ultra Docking Station (40AJ)
- REFURBISHED és ÚJ - Lenovo ThinkPad 40AY Universal USB-C Dock
- Gamer PC-Számítógép! Csere-Beszámítás! I7 10700K / RX 6700XT 12GB / 32GB DDR4 / 1TB SSD
- LG 49WQ95X-W - 49" NANO IPS 10 Bit - 5120x1440 5K - 144Hz - USB Type-C - HDR 400 - G-Sync - FreeSync
- PS Plus előfizetések kedvező áron
Állásajánlatok
Cég: NetGo.hu Kft.
Város: Gödöllő
Cég: Laptopműhely Bt.
Város: Budapest



