Как сделать сохранение в игре пазлы

[Rick13]

Не получается реализовать сохранение и загрузку, кто знает как это сделать?

[beegl]

Если работаете с Bitmap, то :

var
B:TBitMap;
..
B.SaveToFile('f:\1.bmp'); // сохранение

так:

var
  Bitmap: TBitmap;
  Source: TRect;
  Dest: TRect;
begin
  Bitmap := TBitmap.Create;
  try
    with Bitmap do
    begin
      Width   := paintbox1.Width;
      Height  := PaintBox1.Height;
      Dest    := Rect(0, 0, Width, Height);
    end;
    with PaintBox1 do
      Source := Rect(0, 0, Width, Height);
      Bitmap.Canvas.CopyRect(Dest, PaintBox1.Canvas, Source);
      Bitmap.SaveToFile(имя файла);
  finally
    Bitmap.Free;