Сидя дома, утром, я слегка нервничал, все ждал агрегатора, который то появлялся в скайпе то исчезал, при этом храня гордое молчание. Звонить ему было не вариант, денег на счету кот наплакал, смс слать по той же причине не выйдет. Пополнять счет жаба давит. Что ж придумать? Помечтав минутку я полез в яндекс искать сайт оператора чтобы смс скинуть.
Нашел, послал. И тут меня зацепила идея.
Лень мне лазить в яндекс каждый раз искать этого оператора… Напишу ка я софт который меня сразу будет редиректить на страницу отправки смс. Сказано — сделано.
Решил что было бы не плохо — вводишь код — получаешь оператора. Так и написал
if ComboBox1.Text='905' then
begin
Label3.Caption:='Билайн';
Дальше решил, кнопочку если сразу жать без выбора оператора — не есть гуд. и сделал ее так.
if Label3.Caption='Билайн' then
ShellExecute(Handle,nil,'http://www.beeline.ru/sms/index.wbp',nil,nil,SW_SHOWNORMAL);
По сути ничего сложного, делфисты меня поймут.
Выкладываю исходничек, может кто себе допишет чего.
Туц!