Результаты поиска по запросу "delphi"
Каскадный Delphi ADO Query
У меня есть код запроса, который я могу вызывать каждый раз, когда мне нужно извлечь данные из базы данных, и я хочу, чтобы он был потоковым. Не уверен, как реализовать это в потоке, чтобы я мог повторно использовать этот код, в основном, я хочу ...
Вложенные константы вложенных структурированных типов не поддерживаются?
Несмотря на то, что говорит Delphi ссылка структурированные типы могут содержать другие структурированные типы; тип может иметь неограниченные уровни структурирования с заметным исключением какие структурированные типизированные константы не ...
Возврат строки из Delphi DLL в C # Caller в 64 бит
У меня есть приложение на C #, которое вызывает родной Delphi DLL, используя следующий код: C # [DllImport("NativeDLL.dll", CharSet = CharSet.Unicode, CallingConvention = CallingConvention.StdCall)] public static extern int GetString(string out ...
Эквир Синглтон класс Экземпляр Многопоточность
Чтобы получить экземпляр класса с шаблоном Singleton, я хочу использовать следующую функцию: Это эскиз interface uses SyncObjs; type TMCriticalSection = class(TCriticalSection) private Dummy : array [0..95] of Byte; end; var InstanceNumber : ...
Удалить каталог с непустым подкаталогом и файлами
Как удалить один каталог, содержащий несколько файлов и несколько непустых подкаталогов. я пыталсяФункция SHFileOperation [https://stackoverflow.com/questions/11798783/delete-all-files-and-folders-recursively-using-delphi] , Есть проблема ...
Проблема совместимости Delphi XE4 Indy между TBytes и TidBytes
Сегодня я пытаюсь скомпилировать свой проект XE3 в XE4. Первая проблема, с которой я сталкиваюсь, связана с методом Indy's FTCPClient.Socket.ReadBytes (). Раньше он принимал тип TBytes, теперь он настаивает на TidBytes. Определения: TIdBytes = ...
Формирование имени переменной с помощью string + integer и вызывающих функций
Во-первых, я новичок в этом, и вопрос может быть глупым. В любом случае, у меня есть такая процедура: procedure Tform1.QueryChange(sqltext : String; query : Integer); begin if query = 1 then begin ADOQuery1.Close; ADOQuery1.SQL.Clear; ...
Delphi: SetLength () для аргумента типа «массив TObject»
Я пытаюсь изменить размер массива определенного класса, передаваемого в качестве аргумента, например, procedure Resize(MyArray: Array of TObject); begin SetLength(MyArray, 100); end; Однако возникает ошибка «Несовместимые типы E2008». Правда ли, ...
Форвардные объявления для типов записей
Есть ли такая вещь, как в названии? Я пытаюсь сделать это в части преобразования структура API [http://msdn.microsoft.com/en-us/library/windows/desktop/bb775524%28v=vs.85%29.aspx] и столкнуться с чем-то, с чем я раньше не ...
Как проверить, выключен ли основной том системы или нет?
Я использую этот код для отключения / включения звука основного тома системы: const APPCOMMAND_VOLUME_MUTE = $80000; WM_APPCOMMAND = $319; procedure TForm1.Button1Click(Sender: TObject); begin // toggle mute/unmute SendMessageW(Handle, ...