Автор Александр Петров задал вопрос в разделе Другие языки и технологии
как использовать progressbar в delphi? Что бы при нажатие на кнопку проходил прогрессбар а потом появлялось сообщение!? и получил лучший ответ
Ответ от Lexa[гуру]
ProgressBar1. Position:=5;
min -минимальное
max - максимальное
как вариант кинь таймер и пропиши на таймере
ProgressBar1. Position:= ProgressBar1. Position+1;
if ProgressBar1. Position= ...then ...
а на батане timer.enabled:=true;
Источник: я
Ответ от Sm[гуру]
В справке все написано. И пример есть. Глаза-то разуй)
В справке все написано. И пример есть. Глаза-то разуй)
Ответ от Ѓшёл в туман[гуру]
var i: integer; ... procedure ButtonClick for i:=0 to ProgressBar.Max do begin ProgressBar.Position:=i; sleep(100); end; Application.MessageBox('Текст сообщения', 'Заголовок'); end;
var i: integer; ... procedure ButtonClick for i:=0 to ProgressBar.Max do begin ProgressBar.Position:=i; sleep(100); end; Application.MessageBox('Текст сообщения', 'Заголовок'); end;
Ответ от 3 ответа[гуру]
Привет! Вот подборка тем с ответами на Ваш вопрос: как использовать progressbar в delphi? Что бы при нажатие на кнопку проходил прогрессбар а потом появлялось сообщение!?
ProgressBar
Во первых надо было сказать какая среда.. .
Вот для BCB (перевести на Delphi очень просто)
Вопрос Delphi 7 Progress bar
Надеюсь ты правильно задал вопрос и тебе нужно изменять прогрессбар именно при добавлении строки,
подробнее...