Форум программистов, компьютерный форум, киберфорум
Delphi для начинающих
Войти
Регистрация
Восстановить пароль
 
 
Рейтинг 4.70/97: Рейтинг темы: голосов - 97, средняя оценка - 4.70
0 / 0 / 0
Регистрация: 07.08.2011
Сообщений: 11
1

Большой текст в Delphi. (Работа с ресурсами - примечание модератора Mawrat).

24.12.2011, 19:43. Просмотров 17973. Ответов 22


Можно ли вставить большой текст в Delphi до запуска программы
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
24.12.2011, 19:43
Ответы с готовыми решениями:

Работа с ресурсами
Всем доброго времени суток, с наступившим новым годом! Есть проблема: Я создал две процедуры,...

Работа с ресурсами
Нужно сделать программу с линейкой меню код такой #include <windows.h> #include <windowsx.h>...

Работа с ресурсами
Такой вопрос - например, я "засунул" базу данных в ресурсы, как только программа запускается, эта...

Работа с ресурсами
как загрузить в ресурсы программы dll'ку, а при запуске выгрузить ее ? Добавлено через 19 минут...

22
27 / 22 / 13
Регистрация: 08.12.2012
Сообщений: 611
04.02.2015, 13:30 21
я создал файл ресурсов с картинкой *.bmp в Delphi7 с помощью
"Tools" -> "Image Editor" сохранил все в папке с проектом,
при запуске выдается сообщение "файл ресурсов BITMAP1" не найден"
вот еще код с пом.которого пытаюсь открыть эту картину маслом

Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
implementation
 
{$R *.dfm}
  {$R BITMAP1.res}
procedure TForm1.FormCreate(Sender: TObject);
begin
   try
  back:= TBitmap.Create;
  back.LoadFromResourceName(HInstance,'BITMAP1');
  //Change size Form1
  Form1.ClientWidth:= back.Width;
  Form1.ClientHeight:= back.Height; 
     finally
     end; 
end;
 
procedure TForm1.FormPaint(Sender: TObject);
begin
  Canvas.Draw(0,0,back);
end;
0
13062 / 5848 / 1705
Регистрация: 19.09.2009
Сообщений: 8,807
04.02.2015, 15:04 22
Если загрузка ресурса осуществляется через метод TBitMap.LoadFromResourceName(), то такой ресурс должен иметь тип BITMAP, а не RCDATA.

Т. е., делается так.

1. Файловая структура:
Код
--Папка с проектом
----Resources
------ResLib.bat
------ResLib.rc
----Files
------bitmap1.bmp
2. Файл ResLib.bat:
Код
brcc32.exe ResLib.rc
pause
3. Файл ResLib.rc:
Код
BITMAP1 BITMAP "Files\bitmap1.bmp"
4. Запускаем файл: Resources\ResLib.bat
5. В результате выполнения будет создан файл: Resources\ResLib.RES
6. файл Resources\ResLib.RES копируем в корневую папку проекта.
7. В Delphi. На форму надо положить:
Image1 : TImage;
Button1 : TButton;
Для кнопки Button1 создаём обработчик события OnClick и оформляем код таким образом:
Delphi
1
2
3
4
5
6
7
8
9
10
implementation
 
{$R *.dfm}
 
{$R ResLib.res}
 
procedure TForm1.Button1Click(Sender: TObject);
begin
  Image1.Picture.Bitmap.LoadFromResourceName(HInstance, 'BITMAP1');
end;
8. Затем следует выполнить полное построение программы через Project - Build.
0
Вложения
Тип файла: 7z WorkWithBMPResources-01.7z (198.8 Кб, 32 просмотров)
13062 / 5848 / 1705
Регистрация: 19.09.2009
Сообщений: 8,807
04.02.2015, 15:21 23
Поправка в описание структуры папок - папка Files вложена в папку Resuorces:
Код
--Папка с проектом\
----Resources\
------ResLib.bat
------ResLib.rc
------Files\
--------bitmap1.bmp
Добавлено через 8 минут
Кроме рассматриваемого способа работы с ресурсами, есть также следующие возможности:

1. Можно установить соответствующего IDE эксперта (мастера). При этом через меню Delphi станет доступен диалог по загрузке ресурсов. Например, такой мастер присутствует в наборе компонентов RX Library (RXLib). На указанной странице имеются дистрибутивы для разных версий Delphi. Например, для Delphi 7 есть дистрибутив с автоматическим установщиком: RX Library 2.75 для Delphi 7, с автоустановщиком. После установки RX Library в меню Delphi появится пункт: Project - Resources. И наборы новых компонентов в палитре появятся.
2. В новых версиях Delphi - 2009 и выше - подобный мастер уже встроен. Запускается так: Project - Resources and Images.
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
04.02.2015, 15:21

Заказываю контрольные, курсовые, дипломные и любые другие студенческие работы здесь или здесь.

Работа с ресурсами
Знаю, что вопрос глупый, но пожалуйста посоветуйте хорошую программу для работы с ресурсами. Кроме...

Работа с ресурсами
Здравствуйте. Необходимо организовать проигрывание аудиофайла из папки Resources, но не с...

Работа с ресурсами.
Какая функция отвечает за удаление ресурса из exe проги во время её работы или по завершению...

Работа с ресурсами
Вообщем вся картина на картине :) Вот Main.cpp void error(char code) { cout <<...


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

Или воспользуйтесь поиском по форуму:
23
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2021, vBulletin Solutions, Inc.