Форум программистов, компьютерный форум, киберфорум
C++ Builder
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.67/9: Рейтинг темы: голосов - 9, средняя оценка - 4.67
0 / 0 / 0
Регистрация: 11.11.2009
Сообщений: 10

Помогите пожалуйста вывести размер bmp !!!!!

11.11.2009, 14:01. Показов 1860. Ответов 5
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Помоите пожалуйста вывести размер bmp !!!!!
Люди добрые ;-)!!!
Помогите пожалуйста, у меня задание, открыть bmp и сделать его черно-белым,это я сделал, а дальше нужно еще вывести его размер в пикселях, примером 1280х1024, где нибуть в окне, как это сделать (вывести размер) О_о????!!!!!
0
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
11.11.2009, 14:01
Ответы с готовыми решениями:

Вывести размер bmp-изображения
Люди добрые ;-)!!! Помогите пожалуйста, у меня задание, открыть bmp и сделать его черно-белым,это я сделал, а дальше нужно еще вывести...

Помогите пожалуйста, не могу разобраться как сохранять файл, например в формате bmp?
Помогите пожалуйста, не могу разобраться как сохранять файл, например в формате bmp? uses graphabc; var pic: picture; y:...

Вывести длину отрезков (Ребята Помогите пожалуйста.)
Помогите решить задачи на for по Абрамяну на С++. for29, for30. Я сам чайник. Не шарю вообще. По специальности работать не собираюсь. Так...

5
 Аватар для Miks
8 / 8 / 0
Регистрация: 19.06.2008
Сообщений: 54
11.11.2009, 14:56
обработчик:

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
Graphics::TBitmap *tmpBitmap = new Graphics::TBitmap();
 
tmpBitmap->LoadFromFile("C:\\1.bmp"); //грузим файл
TRect rect;
int i, j, bmpWidth, bmpHeight;
 
//  размер TImage
rect = Image1->ClientRect;
for(i = rect.Top; i< rect.Bottom; i += tmpBitmap->Height)
{
  for(j = rect.Left; j < rect.Right; j += tmpBitmap->Width)
  {
    if(j < rect.Right - tmpBitmap->Width)
      bmpWidth = tmpBitmap->Width;
    else
      bmpWidth = rect.Right - j;
    if(i < rect.Bottom - tmpBitmap->Height)
      bmpHeight = tmpBitmap->Height;
    else
     bmpHeight = rect.Bottom - i;
      ::BitBlt(Image1->Canvas->Handle,
               j,
               i,                     
               bmpWidth,              
               bmpHeight,             
               tmpBitmap->Canvas->Handle, 
               0,                        
               0,                        
               SRCCOPY); 
  } 
}
//выводим размеры
Label1->Caption=tmpBitmap->Height;
Label2->Caption=tmpBitmap->Width;
delete tmpBitmap;
1
0 / 0 / 0
Регистрация: 11.11.2009
Сообщений: 10
11.11.2009, 17:15  [ТС]
Прикольно, щас буду юзать этот код, надеюсь поможет ;-)

Добавлено через 25 минут
Ха, реально работает, СПАСИБО!!!!!!!!!!!

Добавлено через 1 час 48 минут
Но, есть одно НО, когда имейдж не открыт, так в проге светятся надписи Label1 и Label2, а как сделать так чтобы пока картинка не открыта, эти надписи были инвизибл, а когда имейдж открыт, то писалось его размер, например 1280х1024 ????!!!!
0
говнокодер
 Аватар для sh4d°_°ff
1273 / 297 / 35
Регистрация: 31.10.2009
Сообщений: 1,432
11.11.2009, 17:26
Form - On Create:
C++
1
2
Label1->Visible=false;
Label2->Visible=false;
потом перед выводим размеры:
C++
1
2
3
//выводим размеры
Label1->Visible=true;
Label2->Visible=true;
если потом где нибудь bmp будет "выгружаться", чтоли ну... т.е. переходим в начальное состояние... где картинка не открыта... если это необходимо снова написать
C++
1
2
Label1->Visible=false;
Label2->Visible=false;
ну или тупо убери значение Caption у label'ей... мб подойдет и такой вариант=)
1
0 / 0 / 0
Регистрация: 11.11.2009
Сообщений: 10
11.11.2009, 17:31  [ТС]
И снова Thanks ;-), сработало !!!!!!!!
0
4 / 4 / 1
Регистрация: 11.08.2010
Сообщений: 19
23.09.2010, 15:24
Form - On Create:
Код C++
C++
1
2
Label1->Visible=false;
Label2->Visible=false;
зачем так мучиться, почему нельзя просто в object inspector в caption просто удалить текст "label1" и тоже для второго лейбела

Добавлено через 31 минуту
"ну или тупо убери значение Caption у label'ей... мб подойдет и такой вариант=)"

ой пардон не дочитал сначала
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
23.09.2010, 15:24
Помогаю со студенческими работами здесь

Пожалуйста помогите, найдите ошибку, не могу вывести В MEMO 2
вот программка: procedure TForm1.Button1Click(Sender: TObject); var max,min,i,n,j,l,z:integer; a,b:array of integer; begin ...

Размер пиксела bmp картинки
Привет всем. Я загрузил в компонент TImage фотографию с расширением bmp. Как узнать реальные размеры фотографии в мм, см (короче в...

SpeedButton. Размер картинок bmp
Всем привет, какое свойство отвечает за установление размера картинок формата bmp при загрузке в свойство Glyph кнопки SpeedButton?Чтобы...

Вывести и обработать два массива, содержащие соответственно 4 и 6 вещественных компонентов. Помогите пожалуйста!!!
Дано несколько массивов чисел. Длины массивов заданы в варианте. Требуется в каждом массиве найти наибольший и наименьший элементы и...

Как уменьшить размер файла bmp?
Есть файл bmp размером, например, 1280x960. Нужно уменьшить размер в 4 раза, то есть до 640x480. Как это реализовать программно на языке...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
6
Ответ Создать тему
Новые блоги и статьи
Контроль заполнения и очистка дат в зависимости от значения перечислений
Maks 12.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача: реализовать контроль корректности заполнения дат назначения. . .
Архитектура слоя интернета для сервера-слоя.
Hrethgir 11.04.2026
В продолжение https:/ / www. cyberforum. ru/ blogs/ 223907/ 10860. html Знаешь что я подумал? Раз мы все источники пишем в голове ветки, то ничего не мешает добавить в голову такой источник, который сам. . .
Подстановка значения реквизита справочника в табличную часть документа
Maks 10.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача: при выборе сотрудника (справочник Сотрудники) в ТЧ документа. . .
Очистка реквизитов документа при копировании
Maks 09.04.2026
Алгоритм из решения ниже применим как для типовых, так и для нетиповых документов на самых различных конфигурациях. Задача: при копировании документа очищать определенные реквизиты и табличную. . .
модель ЗдравоСохранения 8. Подготовка к разному выполнению заданий
anaschu 08.04.2026
https:/ / github. com/ shumilovas/ med2. git main ветка * содержимое блока дэлэй из старой модели теперь внутри зайца новой модели 8ATzM_2aurI
Блокировка документа от изменений, если он открыт у другого пользователя
Maks 08.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа, разработанного в конфигурации КА2. Задача: запретить редактирование документа, если он открыт у другого пользователя. / / . . .
Система безопасности+живучести для сервера-слоя интернета (сети). Двойная привязка.
Hrethgir 08.04.2026
Далее были размышления о системе безопасности. Сообщения с наклонным текстом - мои. А как нам будет можно проверить, что ссылка наша, а не подделана хулиганами, которая выбросит на другую ветку и. . .
Модель ЗдрввоСохранения 7: больше работников, больше ресурсов.
anaschu 08.04.2026
работников и заданий может быть сколько угодно, но настроено всё так, что используется пока что только 20% kYBz3eJf3jQ
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru