PDA

Просмотр полной версии : [Помогите!] Насчёт Tidsmpt и Tprogressbar


CyberNETik
04.01.2012, 21:20
Приветствую вас,работаю в рад студио.
У меня вопрос,точнее прошу помощи..
Дайте пожалуйста команды прибавление Progressbara
т.е. увеличение значения прогрес бара от 0 до 100,.м как бы объяснить короче что бы прибавлялось некое количество очков из 100 стандартных в прогрессбаре. Т. е. команда :
Прогрессбар +(1) (ну типо этого)

Вопрос по Tidsmpt
Мне нужно что бы через программу можно было отправлять письма,точнее вот как
1)Tedit1- хост (smt.mail.ru smpt.yandex.ru)
2)Tedit2 - логин
3)Tedit3 - пароль
4)Tedit4 - тема письма
5)Tmemo1 - само письмо.

Буду очень благодарен :)

InFixion
04.01.2012, 22:47
Приветствую вас,работаю в рад студио.
У меня вопрос,точнее прошу помощи..
Дайте пожалуйста команды прибавление Progressbara
т.е. увеличение значения прогрес бара от 0 до 100,.м как бы объяснить короче что бы прибавлялось некое количество очков из 100 стандартных в прогрессбаре. Т. е. команда :
Прогрессбар +(1) (ну типо этого)

ты это имел ввиду? )

procedure TForm1.Button1Click(Sender: TObject);
begin
progressbar1.StepBy(1);
end;

Добавлено через 2 минуты
по нажатии на кнопку добавляет по 1% к прогрессу

Number/1/
04.01.2012, 23:35
Вопрос по Tidsmpt
Мне нужно что бы через программу можно было отправлять письма,точнее вот как
1)Tedit1- хост (smt.mail.ru smpt.yandex.ru)
2)Tedit2 - логин
3)Tedit3 - пароль
4)Tedit4 - тема письма
5)Tmemo1 - само письмо.
[Ссылки могут видеть только зарегистрированные и активированные пользователи]