Хочу добавить.
Если надо взять только часть от Combobox1.text то необходимо пользоваться функцией UTF8Copy,а не просто Copy.
Хотя это не подходит для просто Label.caption. Тут всё как обычно, без UTF8
Найдено 2 результата
- 24.08.2009 14:02:18
- Форум: Lazarus
- Тема: Количество символов в Memo
- Ответы: 8
- Просмотры: 6727
- 17.08.2009 16:25:01
- Форум: Общее
- Тема: Работа с датой создания файла
- Ответы: 4
- Просмотры: 16687
Re: Работа с датой создания файла
Я тоже занимался точно-такой же задачей. вот мой код. Может пригодится.
if FindFirst(DirIn + '*.JPG', faAnyFile-faDirectory, SearchRec) = 0 then
repeat
AhowMessage( 'Обработка файла: ' + DirIn + SearchRec.Name);
try
FolderName:=DateToStr(FileDateToDateTime(SearchRec.Time ...
if FindFirst(DirIn + '*.JPG', faAnyFile-faDirectory, SearchRec) = 0 then
repeat
AhowMessage( 'Обработка файла: ' + DirIn + SearchRec.Name);
try
FolderName:=DateToStr(FileDateToDateTime(SearchRec.Time ...
