Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Типизация файла [D7, XP]


Der Nechk@ssoff ©   (2006-04-13 16:16:00) 

Опять я.Есть файл,допустим N.dnp как сделать что бы при открытии этого файла,через opendialog, прога думала что это N.bmp?


balepa   (2006-04-14 10:18:00) [1]

mspaint "C:\1.dnp"


Сергей М.   (2006-04-14 08:42:00) [2]


> Что правда?Прям так никак?


Правда.

Событие TOpenDialog.OnIncludeItem по некоторым причинам не работатет так как ему положено.


ЮЮ   (2006-04-14 08:19:00) [3]

Bitmap.LoadFromFile('N.dnp')

если Bitmap объект класса TBitmap, ему, ИМНО, все равно какоё расширение у файла.

З.Ы. Думать должна не прога, а программист.


Anatoly Podgoretsky   (2006-04-13 22:07:00) [4]

Менять то зачем?


STK   (2006-04-13 21:31:00) [5]

Одним словом проверяеш: если открываемый файл имеет расширение(которое там у тебя) то заменить его на то(которое тебе надо).
Все эти операцииздесь были описаны. Не понимаю в чём проблема.


IceBeerg   (2006-04-13 18:59:00) [6]

Der Nechk@ssoff ©   (13.04.06 16:50) [6]
Помоему такой код любые файлы в БМП "переделывает" или я неправ?

Неправы, не "переделывает", а просто меняет расширение файла.


Anatoly Podgoretsky   (2006-04-13 16:56:00) [7]

Прекрасный код, в нем нет никаких проблем.


Der Nechk@ssoff   (2006-04-13 16:54:00) [8]

ЗЫ:
procedure TForm6.N3Click(Sender: TObject);
begin
if openpicturedialog1.Execute then
image1.Picture.LoadFromFile(OpenPictureDialog1.FileName);
end;

Вот,собственно,код который я юзаю.


Der Nechk@ssoff   (2006-04-13 16:50:00) [9]


> Dmitrij_K   (13.04.06 16:44) [5]

Помоему такой код любые файлы в БМП "переделывает" или я неправ?


Dmitrij_K   (2006-04-13 16:44:00) [10]

if opendialog.execute then
 sFileName := ChangeFileExt(opendialog.Filename, '.bmp')


Der Nechk@ssoff   (2006-04-13 16:40:00) [11]


> А что ей мешает так думать?

Прога не знает такого файла вообще,но надо чтобы она думала что это bmp.


Der Nechk@ssoff   (2006-04-13 16:37:00) [12]

Что правда?Прям так никак?


Anatoly Podgoretsky   (2006-04-13 16:36:00) [13]

А что ей мешает так думать?


Сергей М.   (2006-04-13 16:26:00) [14]

Без переделки TOpenDialog считай что никак.


Наверх

Титульная страница Поиск, карта сайта Написать письмо