|
#16
|
|||
|
|||
Уже понял что нельзя, надо использовать RichEdit.
Теперь такой вопрос(наверное достал уже всех) надо что бы один таймер выводил каждые две минут "Выпуск чугуна", это я сделал, но вот когда надо изменить подачи (тоесть все таймеры останавливаются), он сбрасывается и начинает заново отсчитывать 2 мин, как сделать так что бы он не останавливался( точнее останавливалс но навремя но потом шел с того же места), и еще нужен способ что бы через 30 сек после надписи "Выпуск Чугуна" появлялось "выпуск окончен". Всем заранее спасибо. |
#17
|
||||
|
||||
Для ведения журнала сообщений лучше использовать TListView, с инфо-иконками загруженными в TImageList. Переключаете его в режим vsReport, добавляете 1 колонку и вот такой функцией добавляете сообщения:
Код:
Const mtInfo = 2; mtSuccess = 3; mtError = 4; procedure LogMessage(Msg: String; MsgType: Integer); begin frmMain.Log.AddItem(Format('%s %s',[DateTimeToStr(Now),Msg]), nil); frmMain.Log.Items[frmMain.Log.Items.Count-1].ImageIndex := MsgType; frmMain.Log.Scroll(0, frmMain.Log.ListLineHeight); Application.ProcessMessages; end; Жизнь такова какова она есть и больше никакова. Помогаю за спасибо. |
#18
|
|||
|
|||
Помогите
Привет, мне нужна помощь...
Переслать цифры из MS Exsel в StringGrid, а потом эти цифры присвоить переменным для использования в расчетных формулах (что-то вроде а:=..., а потом а/2*в). ПОЖАЛУЙСТА ОЧЕНЬ СРОЧНО!!!!!! |