Eigenschaften von Bildern ausgeben

[BM_90]

Moin!
Ich hab folgendes Problem: Mit meinem Programm kann ich mehrere Bilder öffnen, die denn neben einander angeordnet werden. Ich möchte die Bilder gerne per Mausklick "auswählen", also markieren können. Von dem markierten Bild sollen dann die Eigenschaften (Auflösung, Name, Pfad, Größe,...) in TLabels angezeigt werden. Leider habe ich aber keinen Schimmer, wie das geht.

Vielen Dank schonmal im Vorraus...

[vlees91]

Wie zeigst du die Bilder an?
mehrere TImage Komponenten?

[BM_90]

Ja genau, ich lasse für jedes Bild eine TImage Komponente erstellen...

[vlees91]

Dann kannst du ja ein Array machen pro geladenes Bild mit darin Dateiname und so und dann wenn man auf Image1 klickt die Daten auf Platz 1 im Array, bei image2 die 2. usw

[BM_90]

Super Idee, davon hab ich sogar in Info schonmal was gehört, aber da ist nicht genug hängen geblieben, dass ich jetz wüsste, wie ich das mache...

[vlees91]

Delphi-Quellcode:

type
  TBildInfos = record;  //was ist eigentlich der unterschied zwischen diesem und packed?
    Name, Ort: string;
    Abmessungen: TPoint; //missbrauch davon machen, dass man so zwei integers in einem hat.
  end;
...
var
  Bilder: array of TBildInfos;
begin
  //beim bilder laden direkt das array ausbreiten und die Infos abspeichern
end;

[DeddyH]

Zitat von vlees91:

TBildInfos = record; //was ist eigentlich der unterschied zwischen diesem und packed?

Zitat von Delphi-Hilfe:

Per Voreinstellung sind die Werte in einem strukturierten Typ in einem Word- oder Double-Word-Raster ausgerichtet, um den Zugriff zu beschleunigen. Wenn Sie einen strukturierten Typ deklarieren, können Sie das reservierte Wort packed einfügen, um die Daten in komprimierter Form zu speichern:
type TNumbers = packed array[1..100] of Real; Die Verwendung von packed verlangsamt den Zugriff auf die Daten. Im Falle eines Zeichen-Arrays beeinflusst packed auch die Kompatibilität der Typen. Weitere Informationen finden Sie unter Speicherverwaltung.

[BM_90]

Zitat von DeddyH:

Zitat von vlees91:

TBildInfos = record; //was ist eigentlich der unterschied zwischen diesem und packed?

Zitat von Delphi-Hilfe:

Per Voreinstellung sind die Werte in einem strukturierten Typ in einem Word- oder Double-Word-Raster ausgerichtet, um den Zugriff zu beschleunigen. Wenn Sie einen strukturierten Typ deklarieren, können Sie das reservierte Wort packed einfügen, um die Daten in komprimierter Form zu speichern:
type TNumbers = packed array[1..100] of Real; Die Verwendung von packed verlangsamt den Zugriff auf die Daten. Im Falle eines Zeichen-Arrays beeinflusst packed auch die Kompatibilität der Typen. Weitere Informationen finden Sie unter Speicherverwaltung.

Haut irgendwie nicht richtig hin...

[DeddyH]

Wenn Du hinter dem Wörtchen record mal das Semikolon weglässt...

[BM_90]

Nix. Sagt immernoch das Selbe...