program Autorun10Test;
uses autorun20;
var
OldTime:integer;
begin
OldTime:=autorun20.register_date(GetYear(GetCurrentTime),GetMonth(GetCurrentTime),GetDay(GetCurrentTime)+1,8,0,0,0);
//autorun20.register_date(y,m,d,h,min,sec,ms:integer);
if not SmsStartSend('sms://+79000000', 'Доброе утро любимая :*') then Halt;
while SmsIsSending do // wait for the message to be sent
Delay(100);
if not SmsWasSuccessfull then Halt;
end.
вроде так.
Чтобы тебе не пришлось просыпаться - придется тебе соответствующие права дать приложению...