Witam,
Proszę o rozwiązanie problemu zawartego w temacie. Czyli jak przepisać wybranne pliki (ale bez rozszerzenia, tylko same nazwy plików) do ComboBox.
Z góry dziekuję za rozwiązanie problemu.
Pozdrawiam,
Piotr Murawski
Witam,
Proszę o rozwiązanie problemu zawartego w temacie. Czyli jak przepisać wybranne pliki (ale bez rozszerzenia, tylko same nazwy plików) do ComboBox.
Z góry dziekuję za rozwiązanie problemu.
Pozdrawiam,
Piotr Murawski
Jak zwykle nie mam przy sobie Delphiego, ale może zrobić pętle po wszystkich elementach filelistboxa (filelistbox.items.count, czy coś takiego), w pierwszej kolejności obcinając końcówkę uzyskanego stringa od kropki do końca (delete), i dodawać do Comboboxa (combobox.add)
For i:=0 to FileListBox1.Items.Count-1 do
ListBox1.Items.Add(ChangeFileExt(FileListBox1.Items[i],''));
Tak tez mozna:
var
i:integer;
item:string;
begin
for i:=0 to FileListBox1.Items.Count-1 do
begin
item:=FileListBox1.Items.Strings[i];
Delete(item,Length(item)-3,Length(item));
ComboBox1.Items.Add(item);
end;
pozdrówka