Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   OOP (https://www.clubdelphi.com/foros/forumdisplay.php?f=5)
-   -   Pantalla para registro de ventas (https://www.clubdelphi.com/foros/showthread.php?t=95108)

mRoman 08-03-2021 22:38:27

Pantalla para registro de ventas
 
Buenas tardes a todos.

Trabajo con: Win10, FB 2.0, Delphi6

Estoy con un nuevo proyecto donde tengo una pantalla para el registro de productos (Punto de Venta), en esta pantalla el cliente quiere que le aparezca la foto del producto que ha seleccionado para la venta, y se muestre en un "Grid", es aquí donde me gustaría me apoyaran con alguna sugerencia de componentes para que visualmente lograr lo que mi cliente quiere.

Normalmente he usado DBGrid para mostrar los datos del producto seleccionado, pero nunca había mostrado una imagen....será que el StringGrid me pueda servir??

Muchas gracias por sus comentarios, Saludos.

ecfisa 08-03-2021 22:50:52

Hola.

Revisa si te sirve este enlace: Mostrar imagen/foto en DBgrid

Saludos :)

mRoman 08-03-2021 22:55:33

Cita:

Empezado por ecfisa (Mensaje 540292)
Hola.

Revisa si te sirve este enlace: Mostrar imagen/foto en DBgrid

Saludos :)

Ok, gracias "ecfisa" por contestar...lo analizaré.

Muchas gracias.

ecfisa 09-03-2021 15:51:27

Hola mRoman.

Estuve mirando que el código anterior sólo contempla bitmaps, si deseas usar otros tipos de imágenes basta con un pequeño cambio:
Código Delphi [-]
procedure TForm1.DBGrid1DrawColumnCell(Sender: TObject; const Rect: TRect;
  DataCol: Integer; Column: TColumn; State: TGridDrawState);
var
  Pic: TPicture;
begin
  if (Column.FieldName = 'IMG') then
  begin
    Pic := TPicture.Create;
    try
      Pic.Assign(Column.Field);
      DBGrid1.Canvas.StretchDraw(Rect, Pic.Graphic);  // (antes Pic.Bitmap)
    finally
      Pic.Free;
    end;
  end
end;

Saludos :)


La franja horaria es GMT +2. Ahora son las 01:35:59.

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