FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
||||
|
||||
Cancelar con DelphiTwain
Saludos de nuevo, alguien ha utilizado este componente? alguien sabe como manejar, cuando cancelas una adquisiciòn de imagen, le he intentado con OnAvquireCancel, pero no se como utilizarlo, saludos :S
|
#2
|
||||
|
||||
En uno de los ejemplos viene lo siguiente:
Código:
procedure TForm1.TwainTwainAcquire(Sender: TObject; const Index: Integer; Image: TBitmap; var Cancel: Boolean); begin ImageHolder.Picture.Assign(Image); Cancel := TRUE; {Only want one image} end; Y en el otro ejemplo, lo siguiente: Código:
procedure TFormMain.TwainSourceFileTransfer(Sender: TObject; const Index: Integer; Filename: TW_STR255; Format: TTwainFormat; var Cancel: Boolean); var LoadFileName: String; begin {Set file} LoadFileName := includetrailingbackslash(getcurrentdir) + 'picture.bmp'; {Load and add to list} ImageList.Add(TBitmap.Create); TBitmap(ImageList[ImageList.Count - 1]).LoadFromFile(LoadFilename); DeleteFile(LoadFileName); {In case it's the first image, display} if ImageList.Count = 1 then SelectFirst; GoForward.Enabled := ImageList.Count - 1 > CurrentImage; end; |
#3
|
||||
|
||||
Salduos y mil gracias
Es lo que buscaba, creo que me había perdido entre tanto código, el programa ya me anda como de rayo eres la onda.
|
#4
|
||||
|
||||
Saludos y mil gracias
Muchas gracias, me anda como de rayo eres la onda.
|
|
|
Temas Similares | ||||
Tema | Autor | Foro | Respuestas | Último mensaje |
DelphiTwain: Accesar propiedades de Scanner | Roberto Angulo | Gráficos | 5 | 31-07-2008 21:38:17 |
Cancelar un proceso | pborges36 | Varios | 2 | 29-10-2007 20:48:00 |
Cancelar cambios en ADO | jzginez | Conexión con bases de datos | 3 | 27-04-2007 16:26:20 |
cancelar una consulta | jmlifi | SQL | 1 | 08-11-2005 19:14:11 |
Cancelar borrado | xerkan | Firebird e Interbase | 5 | 29-04-2005 12:55:50 |
|