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

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

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

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

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

Закрытая тема
Ваша тема закрыта, почему это могло произойти? Возможно,
Нет наработок или кода, если нужно готовое решение - создайте тему в разделе Фриланс и оплатите работу.
Название темы включает слова - "Помогите", "Нужна помощь", "Срочно", "Пожалуйста".
Название темы слишком короткое или не отражает сути вашего вопроса.
Тема исчерпала себя, помните, один вопрос - одна тема
Прочитайте правила и заново правильно создайте тему.
 
Опции темы Поиск в этой теме
Старый 15.08.2010, 23:23   #31
phphel
Форумчанин
 
Аватар для phphel
 
Регистрация: 12.07.2010
Сообщений: 249
По умолчанию

Project1.exe
Вложения
Тип файла: zip 1.zip (323.1 Кб, 22 просмотров)
Moonquake
phphel вне форума
Старый 15.08.2010, 23:27   #32
DIgorevich
Погулять вышел
Участник клуба
 
Аватар для DIgorevich
 
Регистрация: 17.05.2010
Сообщений: 1,573
По умолчанию

Тебе надо всего одну строчку изменить...
Код:
  TempBMP.Canvas.CopyRect(Drect, Form2.Canvas, srect);
Или я тебя не так понял, или ты мог бы сказать, что не понимаешь как работать с CopyRect...
Никогда не знаешь, где тебе повезет... (Фрай)
DIgorevich вне форума
Старый 15.08.2010, 23:28   #33
phphel
Форумчанин
 
Аватар для phphel
 
Регистрация: 12.07.2010
Сообщений: 249
По умолчанию

Для примера сделал, не увидел что там form1 стоит..
ибо писал быстро
Moonquake
phphel вне форума
Старый 15.08.2010, 23:32   #34
DIgorevich
Погулять вышел
Участник клуба
 
Аватар для DIgorevich
 
Регистрация: 17.05.2010
Сообщений: 1,573
По умолчанию

Цитата:
Сообщение от DomiNick Посмотреть сообщение
За что ж немилость-то такая?

Возможно пригодится: http://programmersforum.ru/showthread.php?t=108931
Там и Image не помог бы, т.к. процедуре указывается Canvas объекта и она с ним работает. Процедуре пофиг прозрачный он или нет... все равно заполняет целиком, если не указан битмап бэкграунда.

ЗЫ: phphel, ты, кстати нигде не освобождаешь ресуры... я же тебе писал:
Код:
  TempBMP.Free;
  Spectrum.Free;
  BASS_Free;
Никогда не знаешь, где тебе повезет... (Фрай)

Последний раз редактировалось DIgorevich; 15.08.2010 в 23:38.
DIgorevich вне форума
Старый 15.08.2010, 23:37   #35
phphel
Форумчанин
 
Аватар для phphel
 
Регистрация: 12.07.2010
Сообщений: 249
По умолчанию

Сложно делать примеры, так как пытаюсь сделать все макс. похожее на мою основную программу

Цитата:
Сообщение от DIgorevich Посмотреть сообщение
Там и Image не помог бы, т.к. процедуре указывается Canvas объекта и она с ним работает. Процедуре пофиг прозрачный он или нет... все равно заполняет целиком, если не указан битмап бэкграунда.

Что за бред, Image1.transparent:=true;
Отлично работает, и не нужно мутить велосипедов, с копированием части экрана с целью сделать ее фоном...

DIgorevich, хватит уже умничать...

это все примеры, где я пишу лишь ту часть кода, которая действительно важна.
Само собой в основной программе все подругому, доработано и правильно, как это и положено..

не нужно искать везде мелкие ошибки (хотя это в принципе не уместно), с целью повышения своего самолюбия.
Вложения
Тип файла: zip 1.zip (323.4 Кб, 21 просмотров)
Moonquake

Последний раз редактировалось Stilet; 16.08.2010 в 08:29.
phphel вне форума
Старый 15.08.2010, 23:45   #36
DIgorevich
Погулять вышел
Участник клуба
 
Аватар для DIgorevich
 
Регистрация: 17.05.2010
Сообщений: 1,573
По умолчанию

И что там надо сделать?
Никогда не знаешь, где тебе повезет... (Фрай)
DIgorevich вне форума
Старый 15.08.2010, 23:47   #37
phphel
Форумчанин
 
Аватар для phphel
 
Регистрация: 12.07.2010
Сообщений: 249
По умолчанию

Цитата:
Сообщение от DIgorevich Посмотреть сообщение
И что там надо сделать?
Если выбрать файл, а потом открыть Form2 то фон заполняется не так как нужно
Moonquake
phphel вне форума
Старый 15.08.2010, 23:52   #38
DIgorevich
Погулять вышел
Участник клуба
 
Аватар для DIgorevich
 
Регистрация: 17.05.2010
Сообщений: 1,573
По умолчанию

Ты сначала попробуй TImage, а потом говори - это раз
Ты еще ни разу ни о чем не попросил - это два (просто кидаешь код, который я правлю)
Конкретной цели от тебя не дождешься, я так понял - это три.

Вот тебе код: Вложение 28775
Всё, что нужно, для бэкграунда я тебе уже написал. А в следующий раз подумай, перед тем как хамить. Тебе объясняют, как лучше (в плане работоспособности программы и освобождения занимаемых ресурсов), ты это игнорируешь и еще замечания делаешь...
Никогда не знаешь, где тебе повезет... (Фрай)
DIgorevich вне форума
Старый 16.08.2010, 08:31   #39
Stilet
Белик Виталий :)
Старожил
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Сообщений: 57,097
По умолчанию

Флейм. Тема закрыта.
I'm learning to live...
Stilet вне форума
Закрытая тема


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



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
PaintBox _-Re@l-_ Общие вопросы Delphi 11 23.06.2010 12:54
текст в PaintBox krikaved Общие вопросы Delphi 5 06.05.2010 19:05
Вопрос по PaintBox rainbow Общие вопросы Delphi 1 07.04.2010 11:21
Paintbox lacost Мультимедиа в Delphi 3 14.01.2009 09:53
paintbox steck Общие вопросы Delphi 5 28.10.2007 16:15