Hallo
ich mal wieder eine frage,
ich habe mir das Thema von Stephan B.
http://www.delphipraxis.net/internal...ombobox+ordner:
Delphi-Quellcode:
// ordner öffnen
procedure GetFileList(aMask : string;aList : TStrings);
begin
aList.Clear;
with TFileListBox.CreateParented(HWND(-3)) do
begin
try
Mask := ExtractFileName(aMask);
Directory := ExtractFilePath(aMask);
FileType := [ftArchive];
aList.Assign(items);
finally
Free;
end
end;
end;
zur Hilfe genommen aber ich bekomme es nicht hin das in der Combobox nur die Datei ohne Endung angezeigt wird.
also wie ich in einen Label die Endung entferne hab ich hin bekommen :
Delphi-Quellcode:
Label4.Caption := ComboBox1.Items[ComboBox1.ItemIndex];
Label4.Caption := Copy(Label4.Caption, 1, Length(Label4.Caption)-4);
kann mir jemand helfen oder einen kleinen Tipp geben.
Danke Ralle15
[edit=Matze][delphi]-Tags gesetzt. Zukünftig bitte selbst einfügen. MfG, Matze[/edit]