/ Forside / Teknologi / Udvikling / Delphi/Pascal / Nyhedsindlæg
Login
Glemt dit kodeord?
Brugernavn

Kodeord


Reklame
Top 10 brugere
Delphi/Pascal
#NavnPoint
oldwiking 603
jrossing 525
rpje 520
EXTERMINA.. 500
gandalf 460
gubi 270
DJ_Puden 250
PARKENSS 230
technet 210
10  jdjespers.. 200
HJÆLP : Printer canvas!!
Fra : kenneth Møller


Dato : 15-03-01 16:28

hvorfor vi denne program kode stump ikke skrive billede ud på alle slags
printer !!

jeg kan godt skrive ud på en hp5si(600dpi), men ikke på en brother p-touch
(360dpi)


procedure TForm1.Button1Click(Sender: TObject);
var
bmp:tbitmap;
begin
bmp:=tbitmap.Create;
bmp.LoadFromFile('c:\dokumenter\logo.bmp');


with printer do
begin
if ps.Execute then
begin

begindoc;

canvas.StretchDraw(rect(10,10,50,50),bmp);


canvas.font.Name:='clarial';
canvas.Font.size:=8;
canvas.TextOut(30,30,'hej');

enddoc;
end;

end;
end;

end.



Kenneth



 
 
Søg
Reklame
Statistik
Spørgsmål : 177559
Tips : 31968
Nyheder : 719565
Indlæg : 6408938
Brugere : 218888

Månedens bedste
Årets bedste
Sidste års bedste