- ubyegon2: Airfryer XL XXL forrólevegős sütő gyakorlati tanácsok, ötletek, receptek
- laskr99: Processzor és videokártya szilícium mag fotók újratöltve!
- Luck Dragon: Asszociációs játék. :)
- sziku69: Fűzzük össze a szavakat :)
- sziku69: Szólánc.
- D1Rect: Nagy "hülyétkapokazapróktól" topik
- bitpork: Phautós tali a Balcsinál 2025 Augusztus 2 napján (szombat)
- Gurulunk, WAZE?!
- gban: Ingyen kellene, de tegnapra
- GoodSpeed: AMD Ryzen 9 9900X (100-100000662WOF)+ Samsung 990 PRO 2TB MZ-V9P2T0BW
Hirdetés
Új hozzászólás Aktív témák
-
Divi
aktív tag
Hmm nagyon baráti
Más kérdés:
Arra van lehetőség, hogy először lerajzolom egy ''külső'' canvasra azt amit rajolni akarok, és pont akkor aPIXELBEN mint amekkora a nyomtató canvasa 0.1mmben?
ergo fog menni az átadás? Vagy netán a pixelenkénti átmásolás?
Ergo egy ''nyomtatási kép'' funkciót szeretnék megvalósítani... -
Divi
aktív tag
A probléma látszólag megoldódott. De mégse hajlandó Ténylegesen Nyomtatni.
A kód hibátlanul lefut.
Ám a nyomtató azon kívül, hogy átfuttatná magán a papírt egy köpést se nyomtat.
Vajh mitől lehet ez?
A kód:
Var szelesseg,magassag: Integer;
dpix, dpiy:Integer;
Begin
printer.Copies:=1;
printer.Orientation:=poPortrait;
printer.BeginDoc;
dpix:=GetDeviceCaps(Printer.Canvas.Handle, LOGPIXELSX);
dpiy:= GetDeviceCaps(Printer.Canvas.Handle, LOGPIXELSY);
szelesseg:=trunc((printer.PageWidth /dpix)*254); << megadja, hányszor 0,1 mm fér ki a lapra
magassag:=trunc((printer.PageHeight /dpiy)*254);
// showmessage('szélesség: '+inttostr(sz)); < ellenőrzés
// showmessage('magasság: '+inttostr(m));
SetMapMode(printer.Canvas.Handle,MM_LOMETRIC);
printer.canvas.pen.width:=15;
printer.Canvas.Pen.Color:=clBlack;
printer.canvas.Moveto(0,0);
printer.canvas.LineTo(sz,m);
//printer.Abort;
printer.EndDoc;
end;
ötletze valakinek?
Egyébént így BÁRMILYEN nyomtatón ugyanazt az eredményt kapom?
[Szerkesztve] -
lao ce
aktív tag
ezer koszonet a segitsegedert! kiprobaltam, szuperul alakul, valami bitmap bizony van a create es a show kozott amit visszaad.
lehet hogy kicsit belemaszok, mert a kapott kep eleg hmm... sematikus az onshow elott, se button se combo csak hatterszin, edit box meg mondjuk shape. -
lao ce
aktív tag
igaz, nem statikus, de nekem nem kell a frissites resze, csak egy 'capture' egy bitmap-be, de mielott(!) a kepernyore kirajzolodna barmi is.
a wm_paint / onpaint is OK, onpaint szimpatikus, de az onshow utan jon, az onshownal mar megjelenik a form, szoval ez tul keso.
raadasul meg mindig sotet folt elottem hogy lehet-e a formot nem a kepernyore rajzoltatni hanem bitmapbe.
ok, gondolom valamit kavarni kellene a memory bitmap-ekkel, es ez rendben van, elvileg tudom mirol van szo. de ha mondjuk probabol csinalok egy assgn-t egy memory bitmap canvasra... inkabb ideirom:
Bitmap.Canvas.Assign( Form1.Canvas )
akkor jon ez:
cannot assign a TControlCanvas to a TBitmapCanvas
[Szerkesztve] -
Divi
aktív tag
Ki tudnád feljteni pozitívumait/negatívummait?
Egy barát már ajánlotta, de mivel ez eddig teljesen ismeretlen dolog számomra, hogy mi is egyáltalán így jó volna egy kis felhomályosítás, hogy mivel tud többet
és hogyan kell vele megcsinálni, azt amit a sima ''File of'' -fal is meglehet
[Szerkesztve]
Új hozzászólás Aktív témák
- GAMER PC : RYZEN 5 7500F /// 32 GB DDR5 /// RTX 3080 Ti 12 GB /// 512 GB + 1TB
- LENOVO ALL IN PC /// Monitor és számítógép egyben/// 27"/// i5 6400 /// 8GB DDR4 /// INTEL + GTX 950
- ROBUX ÁRON ALUL - VÁSÁROLJ ROBLOX ROBUXOT MÉG MA, ELKÉPESZTŐ KEDVEZMÉNNYEL (Bármilyen platformra)
- Asus H87-PRO LGA 1150 alaplap
- Apple iPad Pro 12.9 5th gen Wifi 128GB Space gray (A2378)
- GIGA AKCIÓ!!! AKTIVÁLATLAN iPad Air M2 11" WiFi + CELLULAR 512GB!!! KÉK
- HIBÁTLAN iPhone 11 64GB Black -1 ÉV GARANCIA - Kártyafüggetlen, MS2132
- Xiaomi 14 512GB, Kártyafüggetlen, 1 Év Garanciával
- Apple iPhone 15 /Gyárifüggetlen / 128GB / 12Hó Garancia / 90% akku
- HIBÁTLAN iPhone 14 Pro Max 256GB Deep Purple -1 ÉV GARANCIA - Kártyafüggetlen, MS3011
Állásajánlatok
Cég: FOTC
Város: Budapest