Как мне найти нужный hwnd ? Если использовать WebBrowser.Handle то он возвращает что-то не то, а под курсором WindowFromPoint( Pos ); возвращает то, что нужно. (читать всё…)

Как сделать, чтобы для 2 картинок была одна и та же функция, но разные номера image в зависимости от того,какой выделен? (читать всё…)

Как запретить клик правой кнопкой мыши в Cromium. (читать всё…)

Прочитать файл в строку(кодировка UTF-8), сделать замену подстроки и снова записать в файл. Проблема в том, что у меня на каком-то этапе меняется кодировка и я не знаю как это исправить. (читать всё…)

Поставил Я Delphi XE3, решил проверить как будет воспроизводить старые проекты и получил ошибку :

[Error Error] Invalid PLATFORM variable «MCD». PLATFORM must be one of the following: «Win32», «Win64», «Android», «iOSSimulator», «iOSDevice», or «OSX32». If PLATFORM is defined by your system’s environment, it must be overridden in the RAD Studio IDE or passed explicitly on the command line to MSBuild; e.g., /p:Platform=Win32.

Решил создать новый проект уже в нем выбило тоже.
Насколько Я понял, от меня требуют win32, но у меня win64.

Может кто сталкивался подскажите, мне винду сносить или что-то сделать можно? (читать всё…)

Jene4ka

Подскажите, можно ли как-то форму в Делфи сделать не обычной квадратной, а другой? Не просто обрезать часть формы и закруглить края, а вообще сделать форму, например, в виде автобуса? (читать всё…)

Подскажите, как сделать перебор строк из memo и сравнивать со строкой в Edit? (читать всё…)

В memo список url-ов. Нужно с помощью idhttp зайти по очереди — сначала на первый url, если соединение есть, то останавливаемся, если не соединило — берем второй url и так до конца. Как реализовать?

саша40

var

i: integer;

url: string;

begin

for i:=0 To Memo1.Lines.Count-1 Do

begin

url:=memo1.lines.strings;

idhttp1.host:=url;

idhttp1.connect;

if idHTTP1.Connected=false then

ListBox1.Items.Add(inttostr(i) + '-недоступен')

else

ListBox1.Items.Add(inttostr(i) + '-доступен');

idHttp1.Disconnect;

end;

ShowMessage('Готово');

end;

Пост написан при поддержке портала All4os.ru — универсальный портал об Операционных системах. Он создан для всех пользователей персональных компьютеров и других электронных устройств нуждающихся в качественном программном обеспечении, доступным по этой ссылке, а также в хорошем совете по его использованию.

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

Как узнать версию уже скомпилированного exe файла?

Yurk@

я пользуюсь короткой версией:

function GetFileVersion(FileName: string; var VerInfo : TVSFixedFileInfo): boolean;

var

InfoSize, puLen: DWORD;

Pt, InfoPtr: Pointer;

begin

InfoSize := GetFileVersionInfoSize( PChar(FileName), puLen );

FillChar(VerInfo, SizeOf(TVSFixedFileInfo), 0);

if InfoSize > 0 then

begin

GetMem(Pt,InfoSize);

GetFileVersionInfo( PChar(FileName), 0, InfoSize, Pt);

VerQueryValue(Pt,'\',InfoPtr,puLen);

Move(InfoPtr^, VerInfo, sizeof(TVSFixedFileInfo) );

FreeMem(Pt);

Result := True;

end

else

Result := False;

end;

function ShowVersion(FileName:string):string;

var

VerInfo : TVSFixedFileInfo;

begin

if GetFileVersion(FileName, VerInfo) then

Result:=Format('%u.%u.%u.%u',[HiWord(VerInfo.dwProductVersionMS), LoWord(VerInfo.dwProductVersionMS),

HiWord(VerInfo.dwProductVersionLS), LoWord(VerInfo.dwProductVersionLS)])

else

Result:='------';

end;

1С:Предприятие — это (одновременно) и технологическая платформа, и пользовательский режим работы. Технологическая платформа предоставляет объекты (данных и метаданных) и механизмы управления объектами. Объекты (данные и метаданные) описываются в виде конфигураций. При автоматизации какой-либо деятельности составляется своя конфигурация объектов, которая и представляет собой законченное прикладное решение. Конфигурация создаётся в специальном режиме работы программного продукта под названием «Конфигуратор», затем запускается режим работы под названием «1С:Предприятие», в котором пользователь получает доступ к основным функциям, реализованным в данном прикладном решении (конфигурации).

купить 1с бухгалтерия базовая версия
тема на форуме

Имеется ListBox, в который загружается список файлов и в конце файла [0] или [1] — это параметр. В зависимости от параметра строка либо зеленая либо красная. У меня стоит сейчас CASE INDEX OF на 30 строк в котором проверка. Естественно если больше 30-ти строк то те не окрашиваются. Как сделать это правильно через цикл? (читать всё…)