Hirdetés
Legfrissebb anyagok
Mobilarena témák
- Samsung Galaxy Watch6 Classic - tekerd!
- Samsung Galaxy A54 - türelemjáték
- Sony Xperia 5 IV - házon belüli siker
- Külföldi prepaid SIM-ek itthon
- Vivo X300 - kicsiben jobban megéri
- Huawei P20 Pro - profit csinál minden fotósból
- iPhone topik
- Samsung Galaxy S25 Ultra - titán keret, acélos teljesítmény
- Valakinek van Infinity-Box hozzáférése?
- Xiaomi 12 - az izmos 12
PROHARDVER! témák
IT café témák
GAMEPOD témák
Keresés
Új hozzászólás Aktív témák
-
Diskcopy
tag
Jó, akkor komplexen a probléma. van ugye a Timagelistem. ebben van 5 kép.(dobókocka képei), és dobok vele 5 darabot( 5 sima image). Ezt akarom kitenni. Kérlek írd meg nekem akkor pontosan, hogy hogy csináljam, mert amint látszik hülye vagyok.
eddig így volt:
for c:=1 to 5 do begin
dobott[c]:=random(5)+1;
Imagelist2.GetBitmap( dobott[c]-1, Timage(Form1.FindComponent('Image'+IntToStr(c))).Picture.Bitmap);
Timage(Form1.FindComponent('Image'+IntToStr(c))).Invalidate;
end;
Előre is kösz.
Új hozzászólás Aktív témák
Aktív témák
Új fizetett hirdetések
- Crucial Pro 48GB (2x24GB) DDR5 5600MHz CL46 - XMP/EXPO - 120 hó garancia
- Corsair VENGEANCE RGB 64GB (2x32GB) DDR5 6000MHz CL30 - XMP/EXPO - 120 hó garancia
- Kingston FURY Beast 64GB (2x32GB) DDR5 5200MHz CL40 - XMP - 99 hó garancia
- Sony G 24-105 f/4 - Sigma 50mm f/1.4 Art (SONY E)
- Összeszerelésre váró komplett gépezet várja új gazdáját!
Üzleti előfizetők hirdetései
- GYÖNYÖRŰ iPhone 12 mini 128GB Blue -1 ÉV GARANCIA - Kártyafüggetlen, MS3854,94% Akkumulátor
- Kindle Voyage REKLÁMMENTES könyvolvasó eladó (fizikai lapozógombok, keretmentes kijelző!)
- iKing.Hu - OnePlus Nord 4 5G 16/512 GB Használt, karcmentes 3 hónap garancia
- magyar billentyűzet - 121 - Lenovo Legion Pro 5 (16ARX8) - AMD Ryzen 7 7745HX, RTX 4070 - 4 év gar
- iPhone AIR 256GB 100% (2028.10.22 Garancia)
Állásajánlatok
Cég: ATW Internet Kft.
Város: Budapest
Cég: BroadBit Hungary Kft.
Város: Budakeszi


