Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 26.02.2010, 20:11   #1
artemavd
Старожил
 
Аватар для artemavd
 
Регистрация: 05.06.2008
Сообщений: 4,206
Вопрос Проблема с загрузкой изображения в Image

Столкнулся с проблемой загрузки изображения в Image1. Пишу такой код:
Код:
procedure TForm1.RzBitBtn4Click(Sender: TObject);
begin
 if Form1.OpenPictureDialog1.Execute then
 begin
  Form1.Image1.Picture.Bitmap.LoadFromFile(Form1.OpenPictureDialog1.FileName);
  Form1.Image1.Stretch:=True;
  Form1.RzLabel30.Caption:=ExtractFilePath(Form1.OpenPictureDialog1.FileName);
 end;
end;
Нажимаю на кнопку, открывается диалог, выбираю картинку, нажимаю "Открыть" и мне выдается ошибка: "Bitmap image is not valid". В чем дело?
Не стоит смеяться над человеком делающим шаг назад, возможно он делает разбег.
artemavd вне форума Ответить с цитированием
Старый 26.02.2010, 20:13   #2
Alex Cones
Trust no one.
Старожил
 
Аватар для Alex Cones
 
Регистрация: 07.04.2009
Сообщений: 6,526
По умолчанию

1) Уберите везде Form1
2) Уверены, что битмап валидный?
3) Попробуйте
Код:
 Form1.Image1.Bitmap.LoadFromFile(Form1.OpenPictureDialog1.FileName);
P.S. Изображение то bmp?
SQUARY PROJECT - НАБОР БЕСПЛАТНЫХ ПРОГРАММ ДЛЯ РАБОЧЕГО СТОЛА.
МОЙ БЛОГ
GRAY FUR FRAMEWORK - УДОБНАЯ И БЫСТРАЯ РАЗРАБОТКА WINAPI ПРИЛОЖЕНИЙ
Alex Cones вне форума Ответить с цитированием
Старый 26.02.2010, 20:17   #3
artemavd
Старожил
 
Аватар для artemavd
 
Регистрация: 05.06.2008
Сообщений: 4,206
По умолчанию

Цитата:
1) Уберите везде Form1
Это привычка, мой стиль так сказать. Это упрощает и ускоряет, для меня набор кода.
Цитата:
Цитата:
2) Уверены, что битмап валидный?
В смысле валидный?
3) Попробуйте
Код:

Form1.Image1.Bitmap.LoadFromFile(Fo rm1.OpenPictureDialog1.FileName);
Если я так пишу, то выдается ошибка при компиляции: [Error] Unit1.pas(468): Undeclared identifier: 'Bitmap'
Не стоит смеяться над человеком делающим шаг назад, возможно он делает разбег.
artemavd вне форума Ответить с цитированием
Старый 26.02.2010, 20:20   #4
Alex Cones
Trust no one.
Старожил
 
Аватар для Alex Cones
 
Регистрация: 07.04.2009
Сообщений: 6,526
По умолчанию

Валидный в смысле открыть его просмотрщиком?
SQUARY PROJECT - НАБОР БЕСПЛАТНЫХ ПРОГРАММ ДЛЯ РАБОЧЕГО СТОЛА.
МОЙ БЛОГ
GRAY FUR FRAMEWORK - УДОБНАЯ И БЫСТРАЯ РАЗРАБОТКА WINAPI ПРИЛОЖЕНИЙ
Alex Cones вне форума Ответить с цитированием
Старый 26.02.2010, 20:27   #5
artemavd
Старожил
 
Аватар для artemavd
 
Регистрация: 05.06.2008
Сообщений: 4,206
По умолчанию

Цитата:
Валидный в смысле открыть его просмотрщиком?
Да файл нормальный, открывается просмотрщиком.
Не стоит смеяться над человеком делающим шаг назад, возможно он делает разбег.
artemavd вне форума Ответить с цитированием
Старый 26.02.2010, 20:28   #6
Alex Cones
Trust no one.
Старожил
 
Аватар для Alex Cones
 
Регистрация: 07.04.2009
Сообщений: 6,526
По умолчанию

Попробуйте грузить не битмап, а саму пикчу.
Код:
Form1.Image1.Picture.LoadFromFile(Form1.OpenPictureDialog1.FileName);
SQUARY PROJECT - НАБОР БЕСПЛАТНЫХ ПРОГРАММ ДЛЯ РАБОЧЕГО СТОЛА.
МОЙ БЛОГ
GRAY FUR FRAMEWORK - УДОБНАЯ И БЫСТРАЯ РАЗРАБОТКА WINAPI ПРИЛОЖЕНИЙ
Alex Cones вне форума Ответить с цитированием
Старый 26.02.2010, 20:40   #7
artemavd
Старожил
 
Аватар для artemavd
 
Регистрация: 05.06.2008
Сообщений: 4,206
По умолчанию

Alex Cones, спасибо, теперь получилось!
Не стоит смеяться над человеком делающим шаг назад, возможно он делает разбег.
artemavd вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Проблема с загрузкой ОС Vali_T Операционные системы общие вопросы 18 07.04.2010 18:50
Хранение изображения после закрытия в Image artemavd Общие вопросы Delphi 14 18.01.2010 10:29
Проблема с загрузкой XP. hebu Windows 11 20.07.2009 14:33
Изменения размера изображения в Image BredoZavR Мультимедиа в Delphi 0 02.07.2009 13:30
Сохранение изображения с Image brutos Мультимедиа в Delphi 7 19.05.2009 12:26