mitiay

Как загрузить файл в Memo с помощью UserName? (читать всё…)

mitiay

Мне нужно загрузить 2 текстовых файла в Memo так, чтобы второй не заменял первый? (читать всё…)

Сегодня утром столкнулся с проблемой!Очень не приятной для меня)В общем моя программа берет данные с тхт файла. Так вот сегодня у моего хостера возникли проблемы и мой хостинг откл.
И сразу при запуске выходит сообщение «socket error 11001» — не возможно подключится к хосту!Вопрос как сделать «Если http://blabla/1.txt’ не доступен то берем данные с http://blabla2/1.txt» и еще одно как заглушить все сообщения об ошибках. (читать всё…)

Подскажите как сделать так, чтобы Pos искал в тексте буквы от А до Я.
Не хочется делать это на кучу строк. Может есть более просто вариант?
if Pos(‘А’…’Я’)<>0 then — это для примера, чтобы мой вопрос был понятнее. (читать всё…)

Mik92

Подскажите, как сделать, чтобы в Memo искало все заданные слова?
Допустим, если не найдена строка ‘123’, тогда ищем ‘1234’, если ее нету, то следующий. (читать всё…)

Проблема следующая: есть основная форма (или родительская) на форме расположена кнопка и листбокс. Вопрос: как создать дочерное окно при нажатии на кнопку, а название этого окна занеслось в листбокс, при этом создать на этой форме (дочерной) те компоненты которые необходимы, и количество создаваемых дочерных окон не должно быть ограниченным?
Дальше хуже, надо что бы, если мы закроем созданное окно то при двойном нажатии на его название в листбоксе это окошко опять появлялось….
Подскажите пожалуйста что да как если это возможно. (читать всё…)

Как при запуске приложения мгновенно скрыть его форму? (читать всё…)

(читать всё…)

Как сделать так, что если клавиатура переключен на «Английский язык», то в Edit1 или Memo1 все равно писал на «Русском языке»? (читать всё…)

XE5
Температурные датчики не имеют стандартизации, поэтому и нет универсального способа прочитать температуру ЦП. В программах типа Everest это учтено, программа в начале распознаёт тип железа, а потом применяет алгоритмы чтения датчиков подходящие для данного типа. Если углубиться в этот вопрос, то можно создать универсальный алгоритм, подходящий для любых систем. Подход типа «спрошу на форуме» не катит.

Vapaamies
Заинтересовался, чуток поигрался. MSAcpi_ThermalZoneTemperature показывает температуру, соответствующую строчке THRM в программе HWMonitor. Это та самая странная температура из всех, у меня она в данный момент равна 22 °C.

Скрипт на VBS, которым игрался (административных прав не требует, что странно):

strServer = "." 

Set objWMI = GetObject("winmgmts://" & strServer & "/root\WMI")

Set objInstances = objWMI.InstancesOf("MSAcpi_ThermalZoneTemperature")  
On Error Resume Next

For Each objInstance in objInstances

    With objInstance

        s = "Current CPU Temperature: " & .CurrentTemperature / 10 - 273 & "°C" & chr(10)

        s = s & "Temperature Sampling Period: " & .SamplingPeriod & " seconds" & chr(10)

        s = s & "Active Trip Point Count: " & .ActiveTripPointCount & chr(10)

        WScript.Echo s

    End With

On Error Goto 0

Next

тема на форуме