1. Apache10.05.2025 в 05:24от
Загрузка...

Скрипты для Delphi.

Тема в разделе "С/С++/Pascal/Delphi", создана пользователем EotU, 10.05.2015.

  1. EotU

    EotU

    Статус:
    Оффлайн
    Регистрация:
    09.08.14
    Сообщения:
    61
    Репутация:
    58 +/-
    Webmoney: 802870071992
    Для начинающих.
    ShellExecute( Handle, 'Open', 'Ваша ссылка', nil, nil, SW_NORMAL );
    в uses пишем ShellApi
    sLabel1.Left:=sLabel1.Left-1;
    if sLabel1.Left = -430 then begin
    sLabel1.Left:= 221;
    end;
    MessageDlg('Активировано!',mtInformation,[mbOK],0);
    MessageDlg('Не активировано!',mtError,[mbOK],0);
    f sLabel1.Visible then
    sLabel1.Visible:=False
    else
    sLabel1.Visible:=True;