/
Forside
/
Teknologi
/
Udvikling
/
Delphi/Pascal
/
Nyhedsindlæg
Login
Glemt dit kodeord?
Brugernavn
*
Kodeord
*
Husk mig
Brugerservice
Kom godt i gang
Bliv medlem
Seneste indlæg
Find en bruger
Stil et spørgsmål
Skriv et tip
Fortæl en ven
Pointsystemet
Kontakt Kandu.dk
Emnevisning
Kategorier
Alfabetisk
Karriere
Interesser
Teknologi
Reklame
Top 10 brugere
Delphi/Pascal
#
Navn
Point
1
oldwiking
603
2
jrossing
525
3
rpje
520
4
EXTERMINA..
500
5
gandalf
460
6
gubi
270
7
DJ_Puden
250
8
PARKENSS
230
9
technet
210
10
jdjespers..
200
Printer
Fra :
Henning Madsen
Dato :
02-03-11 19:54
Håber det er mugligt at få lidt hjælp til en printer udskrift ??
procedure TForm1.Button1Click(Sender: TObject);
Var
I : Integer;
begin
Printer.Orientation := poLandscape;
With Printer Do
Begin
BeginDoc;
For I := 0 To ListBox1.Items.Count -1 Do
Begin
Printer.Canvas.TextOut(500,(I + 1)*2350,ListBox1.Items[I]);
End; // 500 er venstre margen.
EndDoc; // 2350 er linie afstand.
End;
End;
//------------------------------------------------------------------------------
procedure TForm1.FormShow(Sender: TObject);
begin
ListBox1.Items.Add('xxxxxxxxxxxxxxxxxxx xxxxxxxxxxxxxxxx xx')
end;
Dette program virker udmærket, men jeg kunne ønske mig en større og fed
skrift,
Hvordan gør man det ???
Jrg troede man blot kunne ændre skriften i ListBox, men det ændre ikke
udprintningen.
Jeg bruger DELPHI 6 og XP
Bemærk Printeren er sat til poLandscape, Printeren er en HP1150 Laser.
Hvis jeg kan få en plads i køen håber jeg på et godt råd om udprintningen.
m.v.h.
Henning.
Hauge (
02-03-2011
)
Kommentar
Fra :
Hauge
Dato :
02-03-11 20:04
Hej
Den 02-03-2011 19:53, Henning Madsen skrev:
> Håber det er mugligt at få lidt hjælp til en printer udskrift ??
Måske noget i stil med:
Printer.Canvas.font := ListBox1.Fonts;
Har ikke en D jeg lige kan prøve på, men mindes det er noget i den stil.
Mvh Hauge
Søg
Alle emner
Teknologi
Udvikling
Delphi/Pascal
Indstillinger
Spørgsmål
Tips
Usenet
Reklame
Statistik
Spørgsmål :
177577
Tips :
31968
Nyheder :
719565
Indlæg :
6409070
Brugere :
218888
Månedens bedste
Årets bedste
Sidste års bedste
Copyright © 2000-2024 kandu.dk. Alle rettigheder forbeholdes.