Kilka pytań(ListView, zaokrąglanie...)

Witajcie!

Chodzi mi o:

1. Jak wydrukować zawartość ListView (i żeby drukowało GirdLines).

2. Jak zaokrąglić liczbę do dwóch miejsc po przecinku (nie chodzi mi tu o obcięcie do dwóch miejsc tylko zaokrąglenie)

3. jak zrobić, że jeśli w edicie wpisze się przecinek to można jeszzce postawić tylko dwa znaki? (nie mogę zastosować Maskedit, bo nie wiem ile liczba użytkownik wpisze przed przecinkiem)

Chodzi mi głownie o pytanie 1 bo za nic nie mogę do tego dojśc, ale myslę że Wam nie sprawi to problemu...

Ad. 2
Round(Liczba*100)/100
Ad. 3
O ile pamiętam można użyć MaskEdit nawet dla takich przypadków, tylko trzeba odpowiednią maskę wstawić. Ale jeżeli nie chcesz MaskEdit, to po prostu sprawdzaj, co wpisuje użytkownik. Jak wpisze ',' to zaczynasz zliczać ilośc wpisanych znaków. Jak koniec to Key := #0;

Ad 1

Zostaje ewentualnie coś w stylu:

var
b: TBitmap;
x,y: Integer;
begin
b:=TBitmap.Create;
x:=ListView1.Width;
y:=ListView1.Height;
b.Width:=x; b.Height:=y;
b.Canvas.CopyRect(Rect(0,0,x,y),GetFormImage.Canvas,ListView1.BoundsRect);

with Printer do begin
BeginDoc;
Canvas.Draw(0,0,b);
EndDoc;
end;

b.Free;
end;

Nie wiem czy działa jak należy bo pisałem od razu na 4p