[Apophis]

напишите плз пример как соединить 4 изображения 50х50 пикселей bmp в большой квадрат 100х100 пикселей (2х2 изображений)

[<<D>>]

Canvas.draw(0,0,bmp1);
Canvas.draw(50,0,bmp2);
Canvas.draw(0,50,bmp3);
Canvas.draw(50,50,bmp4);

[Apophis]

bmp1,2,3... это типа некие 'c:\123.bmp' ?

[<<D>>]

BMP1,bmp2,bmp3,bmp4:TBitmap;

[Apophis]

Код:

var
bmp1: TBitmap;
...
bmp1.TBitmap.Create;
bmp1.LoadFromFile('C:\123.bmp');
Canvas.draw(0,0,bmp1);

ошибки нет, но ничего на форме не рисует о_О

[<<D>>]

Рисование на форме:

procedure TForm1.FormPaint(Sender: TObject);
var bmp1:TBitmap;
begin
bmp1:=TBitmap.Create;
bmp1.LoadFromFile('C:\123.bmp');
canvas.Draw(0,0,bmp1);
end;

...и всё рисует.
Чтобы перерисовать пиши RePaint;