Прозрачный текст сверху перемещающейся картинки с альфа каналом

Форумы Помощь по пакетуПрозрачный текст сверху перемещающейся картинки с альфа каналом ← Ctrl12Ctrl →

Этот топик читают: Гость

Ответов: 27

Рейтинг: 2

#1: 2013-02-15 21:14:40 ЛС | профиль | цитата

Не знаю, как заставить текст находиться всегда сверху... Требуется прозрачность первого и второго элемента.
code_30343.txt

карма: 0

файлы: 1

code_30343.txt [993B] [246]

Ответов: 1173

Рейтинг: 49

#2: 2013-02-15 21:18:49 ЛС | профиль | цитата

Recosh писал(а):

как заставить текст находиться всегда сверху

Так он и так находится над картинкой.

карма: 0

Ответов: 27

Рейтинг: 2

#3: 2013-02-15 21:31:29 ЛС | профиль | цитата

Когда картинка двигается, текст оказывается под ней
------------ Дoбавленo в 21.31:

Скрин

карма: 0

Ответов: 1731

Рейтинг: 68

#4: 2013-02-15 21:36:37 ЛС | профиль | цитата

В среде правой кн. мыши Передний план

карма: 1

Ответов: 1173

Рейтинг: 49

#5: 2013-02-15 22:30:17 ЛС | профиль | цитата

Recosh писал(а):

текст оказывается под ней

У меня наоборот. Странно

В любом случае

Cosinus писал(а):

В среде правой кн. мыши Передний план

карма: 0

Гость

Ответов: 17029

Рейтинг: 0

#6: 2013-02-15 22:54:48 правка | ЛС | профиль | цитата

Редактировалось 3 раз(а), последний 2021-06-24 08:09:03

карма: 0

Ответов: 1173

Рейтинг: 49

#7: 2013-02-15 23:05:52 ЛС | профиль | цитата

37.45.46.39 писал(а):

Не в его случае.

Это почему? Label вполне успешно перемещается по Z при помощи пунктов "передний план", "задний план". Или я не прав?
------------ Дoбавленo в 23.05:
говорящий айпишник, или вы про

Использование св-ва Transparent может привести к неверной работе в отрисовке остальных элементов формы. Поэтому рекомендуется не использовать данную возможность без особой необходимости

карма: 0

Ответов: 9906

Рейтинг: 351

#8: 2013-02-15 23:13:50 ЛС | профиль | цитата

Ex_ писал(а):

Label вполне успешно перемещается по Z при помощи пунктов "передний план", "задний план

В коде Recosh он УЖЕ на переднем плане.
Потому:

смотрите внимательно схему

- актуальное замечание

Хм.. мне вот интересно, когда же будут проинесены магические три буквы, "которые нельзя называть"

карма: 9

Ответов: 1173

Рейтинг: 49

#9: 2013-02-15 23:24:13 ЛС | профиль | цитата

Ничего не понимаю. Galkov, может, объясните уже наконец, что же там такого в схеме из 3,5 элементов? Надпись на переднем плане, картинка перемещается, она на заднем плане. Что не так?

карма: 0

Ответов: 16884

Рейтинг: 1239

#10: 2013-02-15 23:25:05 ЛС | профиль | цитата

Ex_, у него Kol не тот, что у тебя (гранаты не той системы(с)

)

Скрин

Recosh, поставь Kol от Galkov-а

карма: 25

Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!

файлы: 1

pro1.png [8.9KB] [438]

Голосовали:

Ex_

Ответов: 27

Рейтинг: 2

#11: 2013-02-16 11:22:20 ЛС | профиль | цитата

Tad, не совсем понял тебя. Поиск по 3м буквам на форуме не даёт результата...

карма: 0

Ответов: 16884

Рейтинг: 1239

#12: 2013-02-16 11:32:02 ЛС | профиль | цитата

Recosh, Да не парся ты. Label на Задний план и будет она у тебя сверху.

forfpc.rar
fordelphi.rar
kol.dcu удалить

карма: 25

Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!

файлы: 1

forfpc.rar [641.1KB] [163]

Ответов: 27

Рейтинг: 2

#13: 2013-02-16 11:42:42 ЛС | профиль | цитата

Tad,

понял. сработало

карма: 0

Ответов: 16884

Рейтинг: 1239

#14: 2013-02-16 11:49:58 ЛС | профиль | цитата

выше выложил kol-ы для delphi и fpc

карма: 25

Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!

Ответов: 9906

Рейтинг: 351

#15: 2013-02-16 11:58:34 ЛС | профиль | цитата

ты же каким-то супер-батником хвастался
------------ Дoбавленo в 11.58:
кстати, для коллекционеров.... И для тех, кто имеет права обновить сей контрафакт
((я, если честно, даже не знаю, где он лежит))
есть еще один (совсем недавний) фикс:

#pas
//[procedure CalcMinMaxChildren]
procedure CalcMinMaxChildren( Self_: PControl; var SzR: TRect );
var I: Integer;
    C: PControl;
    R: TRect;
begin
  Szr := MakeRect( 0, 0, 0, 0 );
  for I := 0 to Self_.fChildren.fCount - 1 do
  begin
    C := Self_.fChildren.fItems[ I ];
    if C.Visible then // было if C.ToBeVisible then
...........

карма: 9

Форумы Помощь по пакетуПрозрачный текст сверху перемещающейся картинки с альфа каналом ← Ctrl12Ctrl →


Сообщение ...
Прикрепленные файлы (файлы не залиты)