Forum: Multimedia
Delphi
by DeddyH,
11. Mai 2010
Wenn ich Dich richtig verstanden habe, musst Du nur die Eigenschaften Stretch und Proportional der Image-Komponente auf true stellen. Das erspart Dir das eigene Skalieren.
Forum: Multimedia
Delphi
by DeddyH,
11. Mai 2010
Jaja, ignoriert mich einfach mal wieder *grmpf*. :evil:
Nochmal: ich persönlich würde das eher so machenvar bmp: TBitmap;
begin
bmp := TBitmap.Create;
try
bmp.Width := StrToIntDef(edtBreite.Text,150);
bmp.Height := StrToIntDef(edtHoehe.Text,150);
bmp.Canvas.StretchDraw(Rect(0,0,bmp.Width,bmp.Height),Image.Picture.Graphic);
Image.Picture.Assign(bmp);
Forum: Multimedia
Delphi
by DeddyH,
11. Mai 2010
Ich gehe mal anhand des Namens davon aus, dass imgZeichenflaeche ein TImage ist. Das ist wie in einem anderen Thread bereits gesagt eigentlich nicht dazu gedacht, dass man darauf "herummalt". Wieso zeichnest Du das Ursprungsbild nicht gestretched auf bmp und weist diese dann dem Image zu?
Bachstuben verwechselt :stupid: