|
Вопрос # 414/ вопрос открыт / |
|
Здравствуйте. Я хотел бы задать вопрос на счёт формы.
Много встречается информации о создании формы,
то в виде звёздочки, то элепсовидная, то в виде кольца и так далее.
Как мне сделать форму такой, какой я хочу, то есть ну скажем по рисунку,
а остальная часть формы чтобы была не видима
(как, например иконка, видна та часть, что занимает рисунок,
а остальная часть не видна, только размер формы должен быть побольше).
И если можно ещё спросить, в форме есть свойство AlphaBlendValue,
можно это свойство применить к другим компонентам
(к Memo, Edit, Button), что бы они были полупрозрачными. И ещё как
в Memo1 программно выделить всё(то есть выделить весь текст).
Заранее благодарен.
 |
Вопрос задал: Толков Геннадий Викторович (статус: Посетитель)
Вопрос отправлен: 17 марта 2007, 23:21
Состояние вопроса: открыт, ответов: 2.
|
Ответ #1. Отвечает эксперт: Вадим К
По первому вопросу вам поможет статья
http://www.delphiworld.narod.ru/base/form_by_image.html
По поводу прозрачности компонент. Если форма прозрачна, то компоненты тоже прозрачны.
ПО поводу последнего вопроса
memo1.SelectAll не пробывали?
 |
Ответ отправил: Вадим К (статус: Академик)
Время отправки: 18 марта 2007, 00:04
Оценка за ответ: 4
|
Ответ #2. Отвечает эксперт: ANBsoft
вопрос #370
Фактически тот же вопрос, ответы даны в нем
 |
Ответ отправил: ANBsoft (статус: Студент)
Время отправки: 18 марта 2007, 10:50
Оценка за ответ: 4
|
Мини-форум вопроса
Всего сообщений: 1; последнее сообщение — 18 марта 2007, 00:02; участников в обсуждении: 1.
|
San (статус: Посетитель), 18 марта 2007, 00:02 [#1]:
Самый простой способ:
procedure TForm1.FormCreate(Sender: TObject);
begin
Form1.TransparentColorValue := TrColor;
Form1.TransparentColor := true;
end;
procedure TForm1.FormPaint(Sender: TObject);
begin
Form1.Canvas.Draw(0,0,Map);//Map-нужный bitmap
end;
Работает конечно не быстро...
Там на эту тему очень много инфы
http://delphiworld.narod.ru
|
Чтобы оставлять сообщения в мини-форумах, Вы должны авторизироваться на сайте.
|
