Форум: "Начинающим";
Текущий архив: 2006.05.21;
Скачать: [xml.tar.bz2];
Внизпути к картинкам Найти похожие ветки
← →
zxcv (2006-05-07 22:57) [0]Народ помогите с решением
задача такая
нужно в диалоге выбрать несколько картинок и
получить полные пути к этим картинкам в строковом типе
← →
Anatoly Podgoretsky © (2006-05-07 23:03) [1]Задача понятна, а вопрос какой?
← →
zxcv (2006-05-07 23:06) [2]1 как организовать выбор в диалоге нескольких файлов
2 как получить пути к выбраным файлам
← →
Zeqfreed © (2006-05-07 23:15) [3]
procedure TForm1.Button1Click(Sender: TObject);
var
i : Integer;
s : String;
begin
with TOpenDialog.Create(self) do begin
try
Options := Options + [ofAllowMultiSelect];
if Execute then begin
s := "";
for i := 0 to Files.Count - 1 do
s := s + Files[i] + #13#10;
ShowMessage(s);
end;
finally
Free;
end;
end;
end;
← →
zxcv (2006-05-07 23:44) [4]спасибо
только еще вопрос
что есть #13#10 ?
как обрезать строчку с путем к файлу до
имени самого файла
← →
antonn © (2006-05-08 07:07) [5]zxcv (07.05.06 23:44) [4]
что есть #13#10 ?
переаод каретки на новую строку (enter "программно")
extractfilename() - имя файла
extractfileapath() - путь до файла
extractfileext() - расширение файла
Страницы: 1 вся ветка
Форум: "Начинающим";
Текущий архив: 2006.05.21;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.012 c