Ver Mensaje Individual
  #5  
Antiguo 18-09-2004
Avatar de JefeNet
JefeNet JefeNet is offline
Miembro
 
Registrado: ago 2004
Posts: 111
Reputación: 22
JefeNet Va por buen camino
hola gracias por responder, he tratado de hacer lo que dices pero en el Timage no me sale PasteFromClipboard, si no SaveToClipboardFormat, yo uso delphi 7 no se si eso tenga que ver.
Lo que entiendo es que ponga algo asi?

Código:
  
 
image1.PasteFromClipboard
claro primero habria que copiar una imagen al portapapeles.

pues no me da la opcion PasteFromClipboard ni CopyFromClipboard. Busque en la ayuda de delphi pero no salen ejemplos busque en la red y encontre esto.

Código:
  
  procedure TForm1.Button1Click(Sender: TObject);
  var
	C: TClipboard;
  begin
	C := TClipboard.Create;
	try
	  if Clipboard.HasFormat(CF_BITMAP) then
		DBImage1.PasteFromClipboard
	  else
		ShowMessage('Clipboard does not contain a bitmap!');
	finally
	  C.Free;
	end;
  end;
pero a mi no me funciona no se por que. gracias por tu tiempo
Responder Con Cita