Hirdetés
-
Computex 2024: az ASRock monitorok is a gaming szegmens krémjét vették célba
ph A gyártó a tajpeji rendezvényen egyebek mellett egy 520 Hz-es IPS és egy 4K@240 Hz/1080p@480 Hz-es OLED megoldást is közszemlére tett.
-
Az iPhone 15 frissítésgaranciát, a 16 szép rendereket kapott
ma Sokáig hallgatott az Apple a frissítésekről, most viszont megtudtuk, mennyit garantál.
-
Retro Kocka Kuckó 2024
lo Megint eltelt egy esztendő, ezért mögyünk retrokockulni Vásárhelyre! Gyere velünk gyereknapon!
Új hozzászólás Aktív témák
-
Tomi_78
tag
No szóval, most így sikerült úgy-ahogy megoldanom:
if vizdb>0 then
De valamiért gyanúsan sok fehér képpontot tesz ki, úgyhogy még gondolkodom ezen az egészen...
begin
for i:=1 to vizdb-1 do
begin
if random(100)=1 then
begin
for vsz:=viztomb[i,0] to viztomb[i,0]+palyakep.width div 8 do
for vm:=viztomb[i,1] to viztomb[i,1]+palyakep.height div 8 do
begin
if (random(100)=1) and (palyakep.canvas.Pixels[vsz,vm]=clBlue) then
begin
palyakep.Canvas.Brush.Color:=clWhite;
palyakep.canvas.fillrect(vsz,vm,vsz+1,vm+1);
end
else if (random(100)=1) and (palyakep.canvas.Pixels[vsz,vm]=clWhite) then
begin
palyakep.Canvas.Brush.Color:=clBlue;
palyakep.canvas.fillrect(vsz,vm,vsz+1,vm+1);
end;
end;
end
else Continue;
end;
end;
Új hozzászólás Aktív témák
- HP Z620 és Z820 dupla processzoros gépek, akár E5-2690v2 20 mag, i7-11700 erősség 64 Gb RAM
- Új 2K Gamer PC Ryzen 7 5700X/ RTX 3070 8Gb/1Tb M2/2x8Gb Fury DDR4 3200Mhz/700W 2-3 Év Gar
- Új Gamer PC Ryzen 5 5600X/ RTX 3070 8Gb/1Tb M2/2x8Gb Fury DDR4 3200Mhz/700W 2-3 Év Gar
- Samsung Galaxy Buds2 Pro, Újszerű, 1 Év Garanciával
- Samsung Galaxy A20e 32GB, Kártyafüggetlen, 1 Év Garanciával
Állásajánlatok
Cég: Ozeki Kft.
Város: Debrecen
Cég: Alpha Laptopszerviz Kft.
Város: Pécs