powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Delphi [игнор отключен] [закрыт для гостей] / TShape поверх TcxImage
25 сообщений из 25, страница 1 из 1
TShape поверх TcxImage
    #39786851
zinpub
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Может, кто-нибудь подскажет простой метод... Очень неохота рамку ручками рисовать :-(
...
Рейтинг: 0 / 0
TShape поверх TcxImage
    #39786937
Arioch
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Shape1.BringToFront ?

что конкретно не получается ?
...
Рейтинг: 0 / 0
TShape поверх TcxImage
    #39786965
zinpub
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
AriochShape1.BringToFront ?

что конкретно не получается ?

Не отрабатывает, BringToFront... Даже в дизайнере
...
Рейтинг: 0 / 0
TShape поверх TcxImage
    #39786979
Фотография krapotkin
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
не делайте так. не выйдет
...
Рейтинг: 0 / 0
TShape поверх TcxImage
    #39786982
Arioch
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
zinpubНе отрабатывает

что конкретно не получается ?
...
Рейтинг: 0 / 0
TShape поверх TcxImage
    #39786996
zinpub
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
TShape всегда под TcxImage
...
Рейтинг: 0 / 0
TShape поверх TcxImage
    #39786997
zinpub
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
krapotkinне делайте так. не выйдет

Печально... Над просто TImage все работает... А вот девки
...
Рейтинг: 0 / 0
TShape поверх TcxImage
    #39787042
DimaBr
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Код: pascal
1.
2.
TShape = class(TGraphicControl)
TcxCustomImage = class(TcxCustomEdit)



Графический контрол не может быть поверх окна, потому что графический контрол рисуется на том окне, на котором расположен.

Что мешает использовать два TcxImage ?
...
Рейтинг: 0 / 0
TShape поверх TcxImage
    #39787084
white_nigger
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
zinpubМожет, кто-нибудь подскажет простой метод... Очень неохота рамку ручками рисовать :-(То есть парить себе и другим мозги охота, а вызвать один метод, чтобы нарисовать прямоугольник в том же TcxImage никак?
...
Рейтинг: 0 / 0
TShape поверх TcxImage
    #39787094
zinpub
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
white_niggerzinpubМожет, кто-нибудь подскажет простой метод... Очень неохота рамку ручками рисовать :-(То есть парить себе и другим мозги охота, а вызвать один метод, чтобы нарисовать прямоугольник в том же TcxImage никак?

А эт как?
...
Рейтинг: 0 / 0
TShape поверх TcxImage
    #39787095
zinpub
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
DimaBr
Код: pascal
1.
2.
TShape = class(TGraphicControl)
TcxCustomImage = class(TcxCustomEdit)



Графический контрол не может быть поверх окна, потому что графический контрол рисуется на том окне, на котором расположен.

Что мешает использовать два TcxImage ?

В каком смысле два TcxImage? Мне рамка на картинке нужна, которая, произвольный кусок обводит
...
Рейтинг: 0 / 0
TShape поверх TcxImage
    #39787148
Фотография makhaon
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
zinpub,

нарисуй рамку на картинке, если канвас есть чей-то
...
Рейтинг: 0 / 0
TShape поверх TcxImage
    #39787194
DimaBr
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
zinpubВ каком смысле два TcxImage? Мне рамка на картинке нужна, которая, произвольный кусок обводит
Вместо TShape использовать другой TcxImage, на котором нарисовать рамку
...
Рейтинг: 0 / 0
TShape поверх TcxImage
    #39787195
DimaBr
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Или же переприсвоить Parent
Код: pascal
1.
2.
3.
4.
procedure TForm1.FormClick(Sender: TObject);
begin
  Shape1.parent := cxImage1
end;



...
Рейтинг: 0 / 0
TShape поверх TcxImage
    #39787201
zinpub
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
DimaBrИли же переприсвоить Parent
Код: pascal
1.
2.
3.
4.
procedure TForm1.FormClick(Sender: TObject);
begin
  Shape1.parent := cxImage1
end;





У меня так не работает... D6 девки... 5.4 вроде...

До понедельника точно не скажу...
...
Рейтинг: 0 / 0
TShape поверх TcxImage
    #39787205
zinpub
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
makhaonzinpub,

нарисуй рамку на картинке, если канвас есть чей-то

Придётся так... Оч не хотелось...
...
Рейтинг: 0 / 0
TShape поверх TcxImage
    #39787206
zinpub
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Всем спасибо, закрываемся.
...
Рейтинг: 0 / 0
TShape поверх TcxImage
    #39787210
DimaBr
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
zinpubУ меня так не работает... D6 девки... 5.4 вроде...
Этого не может быть, потому что неможет быть никогда
...
Рейтинг: 0 / 0
TShape поверх TcxImage
    #39787266
zinpub
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
DimaBrzinpubУ меня так не работает... D6 девки... 5.4 вроде...
Этого не может быть, потому что неможет быть никогда

Я же говорю, даже в дизайнере TShape всегда под TcxImage. Если просто кинуть на форму два компонента..
...
Рейтинг: 0 / 0
TShape поверх TcxImage
    #39787360
DimaBr
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
zinpubЯ же говорю, даже в дизайнере TShape всегда под TcxImage. Если просто кинуть на форму два компонента..
Причём тут дизайнер ? В дизайнере вы не можете кинуть TShape на TcxImage
...
Рейтинг: 0 / 0
TShape поверх TcxImage
    #39787363
Фотография defecator
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Модератор форума
zinpubDimaBrИли же переприсвоить Parent
Код: pascal
1.
2.
3.
4.
procedure TForm1.FormClick(Sender: TObject);
begin
  Shape1.parent := cxImage1
end;






У меня так не работает... D6 девки... 5.4 вроде...

До понедельника точно не скажу...
дельфи только на работе ?
оно тебе не надо, поверь
...
Рейтинг: 0 / 0
TShape поверх TcxImage
    #39787620
Arioch
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
выкинуть tcximage и использовать Graphics32 ? там есть готовый класс - прямоуг. выделение, которое пользователь как хочет таскает. RubberBand кажется
...
Рейтинг: 0 / 0
TShape поверх TcxImage
    #39787634
zinpub
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Arioch,

Да мне статично надо...

Всё получилось!

Просто изначально хотелось универсально для любого (TcxImage, Timage.... итд).
...
Рейтинг: 0 / 0
TShape поверх TcxImage
    #39787637
Arioch
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
zinpubTShape всегда под TcxImage

ну собственно тут очевидно другой Z-Order, чем тебе нужен и надо цепочку Parent переопределять, понеже возможно

хорошо, что получилось

Жаль, что сразу не написал что не так было
...
Рейтинг: 0 / 0
TShape поверх TcxImage
    #39787642
zinpub
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Arioch,

Да я забыл совсем, что Timage не TWinControl... сто лет назад им пользовался последний раз :-)
...
Рейтинг: 0 / 0
25 сообщений из 25, страница 1 из 1
Форумы / Delphi [игнор отключен] [закрыт для гостей] / TShape поверх TcxImage
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]