100% Easy Delphi 7 how to make a progressbar

This is the Source code:

Timer:
begin
end;

[kaigster]

The majority of people looking to make a progress bar aren't looking for a constantly increasing bar, but are trying to figure out how to attach it's movement to a process that takes time. This is useless.