Скачать: CL | DM;

Создание компонента Delphi по шелчку мыши   Найти похожие ветки 

← →
Kos135 ©   (2006-10-25 18:23) [0]

Пишу учебную программу по Delphi 6, как мне сделать чтобы по одному шелчку левой кнопки мыши на компоненте (Например SpeedButton) на самой форме появился этот компонент, но только в том месте на форме где щелкнешь мышкой.

---

← →
Palladin ©   (2006-10-25 18:25) [1]

мда... научатся по твоей учебной программе... зачем? самой делфи нехватает?

---

← →
DVM ©   (2006-10-25 18:29) [2]

procedure TForm1.FormClick(Sender: TObject);
var
 pt: TPoint;
 SpeedButton: TSpeedButton;
begin
 GetCursorPos(pt);
 pt := ScreenToClient(pt);
 SpeedButton := TSpeedButton.Create(Form1);
 SpeedButton.Parent := Form1;
 SpeedButton.Left := pt.x;
 SpeedButton.Top := pt.Y;
end;

---

← →
Kos135 ©   (2006-10-25 18:34) [3]

Не для себя пишу для препода, тема курсовой такая !!!

---

← →
Ketmar ©   (2006-10-25 18:47) [4]

>[3] Kos135(c) 25-Oct-2006, 18:34
>Не для себя пишу для препода, тема курсовой такая !!!
тут логическая нестыковка. курсовые прежде всего для себя делают. а если тебе оно нафиг не нужно -- ты не ту специальность выбрал.

---

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

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.027 c