Forum: Sonstige Fragen zu Delphi
Delphi
by -Lucky-,
14. Mai 2008
Na das Bild wird doch erst in der Laufzeit eingefügt.
Forum: Sonstige Fragen zu Delphi
Delphi
by -Lucky-,
14. Mai 2008
:wiejetzt: Das habe ich jetzt nicht ganz verstanden.
ListItem.ImageIndex := ImageList1.AddIcon(Icon);
ListView1.SmallIcons existiert nicht :?:
Forum: Sonstige Fragen zu Delphi
Delphi
by -Lucky-,
14. Mai 2008
Ich krieg die Krise. Jetzt habe ich schon x Stunden in das kleine Problem gesteckt, es funzt nicht. Es werden einfach keine Icons angezeigt!
procedure Tver.BitBtn18Click(Sender: TObject);
var name,inhalt,bytes,komma: string;
groesse,i,symbol: integer;
Icon: TIcon;
FileInfo: SHFileInfo;
ListItem: TListItem;
begin
if dateinummer >= 500 then ShowMessage('Soviele Dateien können nicht...
Forum: Sonstige Fragen zu Delphi
Delphi
by -Lucky-,
13. Mai 2008
Das funzt nicht wirklich...
Icon.Handle := FileInfo.hIcon;
Genau in dieser Zeile steigt mein Programm aus! Wenn ich nur diese Zeile auskommentiere, dann läuft es wenigstens, auch wenn nichts passiert.
Bitte um Hilfe^^
Forum: Sonstige Fragen zu Delphi
Delphi
by -Lucky-,
12. Mai 2008
Ich möchte in TListView das Symbol der entsprechenden Datei angezeigt haben. Damit das geht, muss ich wissen, wo ich das Icon (Symbol) auf der Festplatte finde. Wenn ich z.B. eine *.txt Datei habe, dann möchte ich das Symbol für die Textdatei laden. Dies soll für alle Dateitypen möglich sein. Ich habe schon versucht den Speicherort über die Registry heraus zu bekommen, das funktioniert aber...