Hallo Leutz,
ich bin neu im Forum und hab noch nicht so viel Erfahrung mit Delphi. Ich arbeite gerade an einer Dvd Verwaltung, die die Daten von mehreren DvDs in einer Liste speichert, die ich dann abrufen und bearbeiten kann. Bisher hab ich nur string daten. Ich wollte jetzt noch versuchen das Cover der DvD als jpeg in einem bestimmten Format laden und als weitere Eigenschaft einer DvD speichern. Das Laden des Bildes macht das Programm schon, ich weiß nur nicht, wie ich aus dem Image rauskriege unter welchem Dateipfad das Bild zu finden ist und wie ich einen Zeiger darauf legen kann, den man immer wieder neu zuordnen kann.
Also mein eigentliches Problem liegt in der Erstellung des Zeigers und der immer wieder neuen Zuweisung auf aktuelleDvD.
Hier der QText zum Laden des Bildes: (Die DVDListe wird in einer seperaten
Unit erstellt)
Delphi-Quellcode:
procedure TFensterFrm.picbtnClick(Sender: TObject);
var
jpg :TJPEGImage; //uses jpeg;
begin
jpg:=TJPEGImage.Create;
try
with openpicture do Begin
if openpicture.Execute then jpg.LoadFromFile(filename);
cover.Picture.Bitmap.Assign(jpg);
end;
finally
jpg.Free;
end;
end;