AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Thema durchsuchen
Ansicht
Themen-Optionen

Listbox: Bilder dem Text voranstellen

Ein Thema von hansklok · begonnen am 17. Jul 2005 · letzter Beitrag vom 18. Jul 2005
 
hansklok

Registriert seit: 14. Apr 2004
Ort: Karlsruhe
318 Beiträge
 
Delphi 2010 Architect
 
#1

Listbox: Bilder dem Text voranstellen

  Alt 17. Jul 2005, 13:51
Hallo,

gleich zu Beginn: Ich weiß, dass diese frage im Forum schon häufig gestellt wurden ist, jedoch konnten mir diese Beiträge nicht weiterhelfen (vermutlich stelle ich mich zu blöd an).

Also ich habe ne ListBox (lbBilder), in die der folgende Code die ausgewählten Bilder von OpenPictureDialog1 mit deren Pfad als Items in die ListBox geladen werden sollen.

Delphi-Quellcode:
Bilder: array[1..99] of TBitmap;

...

procedure TfImport.bHinzufuegenClick(Sender: TObject);
begin
  if not OpenPictureDialog1.Execute then
         exit;
  with OpenPictureDialog1 do
    for i := 0 to Files.Count - 1 do
      begin
        Bilder[i]:= TBitmap.Create;
        Bilder[i].PixelFormat:= pf24Bit;
        Bilder[i].Width:= 50;
        Bilder[i].Height:= 35;
        Bilder[i].Canvas.CopyRect(Bilder[i].Canvas.ClipRect, lbBilder.Canvas, Rect(5, 0, 5 + 50, 0 + 35));
        Bilder[i].Canvas.Draw(0,0,Bilder[i]);
        Bilder[i].Free;
        //lbBilder.Items.add(Files.Strings[i]);
        lbBilder.Items.AddObject(Files.Strings[i], TBitmap(Bilder[i]));
      end;
end;
Das Laden des jeweiligen Pfades klappt. Ich möchte jedoch auch vor dem jeweiligen Pfad das Bild eingefügt haben. Dies funktioniert aber nicht.
Ich habe die ListBox auf OwnerDrawVariable eingestellt.

so soll es einmal aussehen:

Danke im Vorraus
Angehängte Grafiken
Dateityp: jpg listbox_129.jpg (66,0 KB, 47x aufgerufen)
  Mit Zitat antworten Zitat
 


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 06:50 Uhr.
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz