Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.09.23;
Скачать: CL | DM;

Вниз

Как сделать кнопку нестандартной формы?   Найти похожие ветки 

 
kazaam ©   (2002-09-13 08:25) [0]

А нестандартную форму?


 
RV ©   (2002-09-13 08:50) [1]

procedure TForm1.FormCreate(Sender: TObject);
const
n = 1;
var
nn : integer;
ResultReg, Reg : HRGN;
P : array[0..n-1] of TPoint;
begin
//Put Ellipse
//инициализация ResultReg
ResultReg := CreateEllipticRgn(111,92,427,261);
//Put Ellipse
Reg := CreateEllipticRgn(255,108,288,252);
CombineRgn(ResultReg,ResultReg,Reg,RGN_DIFF);
SetWindowRgn(Handle, ResultReg, False);
end;


 
RV ©   (2002-09-13 09:14) [2]

хошь утилитку, дабы ручками не писать, пиши



Страницы: 1 вся ветка

Текущий архив: 2002.09.23;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.017 c
3-73495
@Ujin
2002-08-31 19:12
2002.09.23
ADO - проблема!!! А Ж... уже горит....


1-73593
Guzz
2002-09-05 19:41
2002.09.23
Вопрос по джойстику


14-73889
начинающий програмер
2002-08-29 20:57
2002.09.23
Delphi и глюки


14-73884
Digitman
2002-08-29 12:30
2002.09.23
Отличное наглядное пособие для новичков в Delpi Object Pascal )


1-73657
grigorys
2002-09-10 17:57
2002.09.23
DELPHI и VB