Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Varios
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Grupo de Teaming del ClubDelphi

 
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 28-10-2007
Avatar de HW-AND-SW
HW-AND-SW HW-AND-SW is offline
Miembro
 
Registrado: oct 2007
Ubicación: CD. VALLES, SLP
Posts: 12
Poder: 0
HW-AND-SW Va por buen camino
Esto guarda imagene en tu tabla paradox

Solo necesitas un boton para buscar la imagen que deseas almacenar que en este caso es el Button1 donde necesitas un componente openpicturedialog, un componente table para poder gurdarla y el Button1 es para guardar.
Espero les sirva yo busque mucho esta informacion y nada me servia a lo mejor por que soy nuevo en esto no me la complico y busco maneras faciles.


Código Delphi [-]
 
unit Unit1;
interface
uses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
  Db, DBTables, DBCtrls, ExtDlgs, StdCtrls, ExtCtrls;
type
  TForm1 = class(TForm)
    Button1: TButton;
    OpenPictureDialog1: TOpenPictureDialog;
    Table1: TTable;
    Button2: TButton;
    Image1: TImage;
    procedure Button1Click(Sender: TObject);
    procedure Button2Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;
var
  Form1: TForm1;
implementation
{$R *.DFM}
procedure TForm1.Button1Click(Sender: TObject);
begin
openpicturedialog1.execute;
image1.Picture.LoadFromFile(openpicturedialog1.filename);
end;
procedure TForm1.Button2Click(Sender: TObject);
begin
TABLE1.OPEN;
TABLE1.INSERT;
TABLE1.FieldByName('FOTO').ASSIGN(Image1.Picture);
TABLE1.POST;
TABLE1.CLOSE;
end;
end.

Última edición por marcoszorrilla fecha: 28-10-2007 a las 22:04:35. Razón: a
Responder Con Cita
 



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
solo guarda el ultimo registro en una tabla nikotina Conexión con bases de datos 4 06-10-2006 17:24:23
Por que No Guarda Paradox y antes si IcebergDelphi Tablas planas 6 25-01-2006 19:58:13
Guarda un menu en una tabla pborges36 Varios 0 30-05-2005 21:16:14
problemas al guarda datos en tabla en intebase pharaonhx Conexión con bases de datos 4 28-02-2005 05:02:29
no guarda los datos en la tabla Giniromero Conexión con bases de datos 10 01-06-2004 16:13:31


La franja horaria es GMT +2. Ahora son las 02:59:52.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi