[d1sable]

Сообщение от d1sable

Ребят, как сделать так чтобы

Если Edit1.Text равен 123 , то Button1.Enabled := false;

Зарание спасибо!

Код:

if CommandLabel.Caption = 'Command : Play' then
Form1.Left:=0;
Form1.Top:=0;
x := 434;
y := 258;
SetCursorPos(x, y);
Mouse_Event(MOUSEEVENTF_LEFTDOWN, x, y, 0, 0);
Mouse_Event(MOUSEEVENTF_LEFTUP, x, y, 0, 0);
Application.Restore;
ButtonStop.Enabled:=true;
ButtonPlay.Enabled:=false;

if CommandLabel.Caption = 'Command : Stop' then
Form1.Left:=0;
Form1.Top:=0;
x := 60;
y := 472;
SetCursorPos(x, y);
Mouse_Event(MOUSEEVENTF_LEFTDOWN, x, y, 0, 0);
Mouse_Event(MOUSEEVENTF_LEFTUP, x, y, 0, 0);
Application.Restore;
ButtonStop.Enabled:=false;
ButtonPlay.Enabled:=true;

Вот так у меня не прокатывает(Запускаются всеравно обе и сразу)