Antes que nada hola.. a todos, soy principiante en delphi pero me he informado mucho sobre este lenguaje, de hecho estoy haciendo un editor en 2D,con un TMainMenu, abro archivos *.BMP , y guardo el mismo en mi compu, pero a la hora de abrirlo en la misma me dice que hay un error "No se puede leer el archivo"; Porfavor si me podrían decir cual es mi error.
Mi código es el siguiente:
private { Private declarations }
c_pluma : TColor;
g_pluma : byte;
t_pluma : byte;
_px, _py : integer;
nom_bmp : string;
BB : TBitmap;
procedure TForm1.GuardarComo1Click(Sender: TObject);
var
nombre : string;
begin
SaveDialog1.Filter:= '*.bmp';
if SaveDialog1.Execute then begin
nom_bmp:= SaveDialog1.FileName;
nombre := Image1.Name;
Image1.Picture.SaveToFile(nombre);
end;
end;
De ante mano muchas gracias!!!.