2 replies to this topic

[Maik2]

Hello,

 

I'm using NextDBGrid5 in slide mode in my application.
I'd like to display one graphic at a time, as shown in the screenshot.
However, the photos aren't stored as BLOBs in the database; only the actual filename, including the path, is stored.

 

Could you perhaps show me a solution (code example) to achieve this successfully?

 

Thank you in advance.

 

 

 Screenshot 2025-11-09 131728.png   16.97KB   0 downloads

[Maik2]

procedure TFormTagelohnauftraege.NextDBGrid1CustomDrawCell(Sender: TObject;
  ACol, ARow: Integer; CellRect: TRect; CellState: TCellState);
var Image : TImage;
    Foto  : string;
begin
  if ACol=28 then begin
    Image := TImage.Create(Self);
    try
      Foto := Bilderpfad + '\' + MySQL_DataModule.QueryTG.FieldByName('DATEINAME_FOTO1').AsString;
      Image.Picture.LoadFromFile(Foto);
      NextDBGrid1.Canvas.StretchDraw(CellRect, Image.Picture.Graphic);
    finally
      Image.Free;
    end;
  end;
end;

I've solved it this way now. But I don't know if this is the recommended or correct way...

[Boki (Berg)]

Hello,

 

Please sorry for the huge delay. Your solution is good, but if you have some smaller number of records, I would cache them in some way. But if the images are small and it work fast for you then it's ok.

 

I will personally try to see if the image is on screen (record is loaded) and then load image from TList<TGraphic>