Search options (Page 172 of 400)

К сожалению редактирование поля типа ДАТА/ВРЕМЫ пока не реализовано полностью.

По поводу раскраски, протестировал, работает, не могли бы вы приложить свой проект? С описанием действий приводящих к пропадаюнию раскраски строк.

Hello.

It should works, please attach your project.

На сколько я помню вы пользователь пиратской версии программы, к сожалению я не могу оказать вам техническую поддержку в полной мере.

Игоревич
Помоему здесь лишняя кавычка

"''+ sUserName +''"

попробуйте так

"'+ sUserName +'"

но лучше приложить проект

Для формы установите свойства
Sizeable = True
AutoScroll = True

теперь если за пределами размеров формы будут расположены какие либо компоненты, полосы прокрутки появятся автоматически.

также в секции скрипта begin end. можете разместить данный код, чтобы прокрутка формы была плавной

begin
    Form1.VertScrollBar.Tracking := true;
    Form1.HorzScrollBar.Tracking := true;
end.

May be your general form have another name?
So you must use name of general form instead Form1

Also perhaps you have old version.

Я описал три варианта, о какой примере идет речь?

Приветствую.

К сожалению не могу понять вопрос точно.
Лучше приложите ваш проект и опишите, что именно необходимо получить в итоге.

Fixed.

Приветствую.

// выполнение какого либо  дейстия через заданный промежуток времени

const
   period = 10; // промежуток времени в секундах

var
   Timer: TTimer;
   iTimer: integer;

procedure Form1_Button1_OnClick (Sender: string; var Cancel: boolean);
begin // запуск таймера
    iTimer := period;
    Timer.Enabled := True;  // Start timer
end;

procedure Form1_OnShow (Sender: string; Action: string);
begin
     Timer := TTimer.Create(nil); // create timer
     Timer.Enabled := False;
     Timer.OnTimer := @OnTimer;  // event procedure
     Timer.Interval := 1000;
end;

procedure Form1_OnClose (Sender: string; Action: string);
begin
    Timer.Free;
end;

procedure OnTimer (Sender: TObject);
begin
    //Form1.Label1.Caption := FormatDateTime('hh:nn:ss', iTimer/86400); // при желании можно вывести обратный отсчет
    Dec(iTimer);
    if iTimer < 0 then
    begin
        // выполнение какого либо действия, например отправка смс
        iTimer := period;
    end;
end;

пример для отправки sms очередью
http://myvisualdatabase.com/forum/misc. … download=1

также многие сервисы по отправке SMS через HTTP запрос позволяют отправлять сообщение сразу нескольким пользователем просто указав телефонные номера в http запросе через разделитель, например этот сервис
http://smsc.ru/api/http/?SE=c74af8a7#send

пример

http://smsc.ru/sys/send.php?login=<login>&psw=<password>&phones=<phones>&mes=<message>

параметр phones
Номер или разделенный запятой или точкой с запятой список номеров мобильных телефонов в международном формате, на которые отправляется сообщение.