вопрос по Delphi

Сообщений: 646 Регистрация: Дек 2010

29 Июня 2012 17:15

Здравствуйте!
У меня есть готовая программа, которая из файла берет 1 строчку и проверяет (сравнивает) ее. Если совпадает то выводит в Edit если нет по переходит к другой. (и все это работает в фоновом режиме)
Скажите как сделать так, чтобы отображалось на экране (чтобы было видно) какую строчку сейчас проверяет и сколько проверило и сколько прошло
т.е. мне нужно чтобы в режиме реального времени отображало процесс работы!
Как такое сделать?

За ранее спасибо!!!

900 руб/сут на блоге с ТИЦ80 и 4000стр

6400руб/мес(7150стр, тиц30,пр2)

Продвинул ВЧ запрос в ТОП10 за 3 меc

Jawakharlal

Сообщений: 27 Регистрация: Фев 2012

29 Июня 2012 18:23

вот в коде, где берет из файла строку - сделай вывод на окно..

Александр

Сообщений: 646 Регистрация: Дек 2010

29 Июня 2012 19:42

дело в том, когда я вывожу результат на лабел или едит, то пишет ошибку:
Incompatible types: 'TEdit' and 'String'

Richard Kibler

Сообщений: 160 Регистрация: Дек 2011

29 Июня 2012 19:45

http://programmersforum.ru/ тут вам 100% помогут.

Александр

Сообщений: 646 Регистрация: Дек 2010

29 Июня 2012 19:52

Richard Kibler, спасибо за сайт!

Я сделал чтобы оно выводило или через совмессадже или через ЕДИт.
чтоб через едит выводило нужно было прописать:
Edit1.Text:=
а вот в лабел как правильно прописать?
Label1.что здесь прописать?:=

Антон

Сообщений: 124 Регистрация: Июн 2010

29 Июня 2012 19:58

Александр, если еще актуально, то могу помочь. Напишите мне в ЛС.

У нас Вы всегда найдете по самым низким ценам батареи для ноутбуков. Доставка по Украине бесплатно!

Maikl

Сообщений: 132 Регистрация: Сен 2010

29 Июня 2012 19:59

Вроде label1.caption:=
Эх, давно это было smile:confused:

Полезные скрипты для сайтов
Хостинг за 99 рублей

Александр

Сообщений: 646 Регистрация: Дек 2010

29 Июня 2012 20:02

Maikl, спасибо.
Точно же .Caption это же аналог .Text

Александр

Сообщений: 646 Регистрация: Дек 2010

29 Июня 2012 20:05

Спасибо это сделал.
А теперь как еще сделать так, чтобы еще считало в процентах допустим
выполнено 12/50 текущее YYYYY

Вот с текущим уже все ОК. а вот с 1 частью? какие есть у кого соображения?

Антон

Сообщений: 124 Регистрация: Июн 2010

#10

29 Июня 2012 20:12

Цитата
Александр пишет: Спасибо это сделал. А теперь как еще сделать так, чтобы еще считало в процентах допустим выполнено 12/50 текущее YYYYY Вот с текущим уже все ОК. а вот с 1 частью? какие есть у кого соображения?

Код
var str:String; value,sum:integer; ... value := 12; sum := 50; str := FloatToStrF( value/sum*100 ,ffFixed,4,2)+'%';

Изменено: Антон - 29 Июня 2012 20:15

Александр

Сообщений: 646 Регистрация: Дек 2010

#11

29 Июня 2012 20:17

Антон, проблема заключается в том, что пользователь может подключить к программе любой файл.
а в файле может и 10 строчек быть а может и 200.
Сложность в том, что нужно сначала посчитать количество строчек наверное

Александр Сообщений: 646 Регистрация: Дек 2010	#12 29 Июня 2012 22:10 Всем большое спасибо за ответы! Все сделал и все заработало. Осталось сделать только 2 задачи: 1) многопоточность 2) универсальность (для других движков)

Новые темы	Объявления	Свободное общение
16:11 Давайте начнем обмен отзывами Google maps 22:14 Webvork - международная товарная СРА сеть с сертифицированными офферами на Европу. 13:03 AntiBot Cloud - бесплатный скрипт и сервис защиты сайтов 13:04 DreamCash.tl - заработок на онлайн-видео. До 95% отчислений, отличный конверт! 20:13 Dao.AD: Монетизация и покупка Push/Pops/Inpage и Video трафика! 15:04 Adtrafico - Правильная партнёрская сеть под бурж трафик 19:21 LOSPOLLOS.COM - Конвертим по рецепту Хайзенберга. Dating, Mainstream, Binary Options	19:49 Sectormoney.com - быстрый и удобный обменник 18:51 TELEGRAM EXPERT — Многоцелевой комбайн по работе с Telegram! 04:17 Просто $0.04/IP 9PROXY.COM Резидентные прокси Неограниченная пропускная способность Уникальная политика замены Без чёрного списка 02:16 BetaTransfer касса — это надежный сервис приема платежей в сфере High Risk 21:43 Coin Click.cc - Быстрый и надежный обмен электронных валют в два клика 15:03 Продам аккаунты 1 ТБ Облако@Mail.ru 14:59 PlayPay.biz - Лутбоксы с товарами, играми	23:14 Точные прогнозы на футбол 20:09 Сколько сейчас стоит наполнение ИМ? 12:43 Куплю проигрышные букмекерские аккаунты 04:33 Половина скидок на распродажах — фейк 07:53 НейроБабушка наказывает мошенников 19:59 Осталось 3-5 месяцев до блокировки YouTube в России, — заявил Клименко 19:57 Пятница 13-ое: VK принял радикальное решение и закрыл доступ к порно контенту