помогите приделать прогрессбар.

[Serge_Bliznykov]

ну неужели не видно, что Вы циферку один теряете?!

в SENDFILE
form1.ProgressBar1.position ....

[Mobile™]

Сообщение от Serge_Bliznykov

ну неужели не видно, что Вы циферку один теряете?!

в SENDFILE
form1.ProgressBar1.position ....

не нетеряю. просто я пробовал и просто прогресбар и прогресбар1. естественно в названии тоже менял

[raxp]

то что вы добавляете tform1
или
form1.ProgressBar1.position
- называется управлять областью видимости, если вы делает первое, то не забудьте и прописать функцию в секции private например, если второе, то вы принудительно обращаетесь к к компоненту через форму...

мдя, пост растянулся... но мы ведь его добъем ведь?

[Mobile™]

Сообщение от raxp

то что вы добавляете tform1
или
form1.ProgressBar1.position
- называется управлять областью видимости, если вы делает первое, то не забудьте и прописать функцию в секции private например, если второе, то вы принудительно обращаетесь к к компоненту через форму...

мдя, пост растянулся... но мы ведь его добъем ведь?

хрен знает что случилось но добавив еще раз сюда-

while true do
        begin
          rb := 0;
          // ÷èòàåì 4 êèëà èç ôàéëà
          ReadFile(hFile, buf, 4096, rb, nil);
          if rb = 0 then break; // åñëè íå ñ÷èòàëîñü òî âûõîä èç öèêëà
          send(sock, buf, rb, 0); // ïîøëåì ñ÷èòàííûå äàííûå
          inc(num_packet);
          form1.progressbar1.position:= num_packet* 4096 div fs;
        end;

она скомпилировалась. только работает не правильно а именно- отправляем файл размером несколько кб. после отправки прогрессбар показывает примерно 20 процентов. отправляем файл 4 метра -показывает 1 деление. и именно после отправки. в процессе отправки прогрессбар молчит

[raxp]

сделайте вложением весь ваш проект без exe, вечерком гляну

[Mobile™]

Сообщение от raxp

сделайте вложением весь ваш проект без exe, вечерком гляну

вот держите

[Mobile™]

ну что там?

[raxp]

собственно, мне бы поужинать, нетерпеливый вы наш... только с работы домой

[Mobile™]

хорошо. спасибо.

[raxp]

поправил ваш код...во вложении