Подскажите пожалуйста как вывести текст на печать из Memo через PrintDialog и PrinterSetupDialog? (читать всё…)

Нужно, чтобы при нажатии на кнопку «Остановить» поток завершался и выполняемый скрипт останавливался. (читать всё…)

На форме есть компонент TMemo с вертикальными скроллами. Например, я перемешаю бегунок скролла на середину, как мне по нажатию кнопки вернуть его в начальную позицию, то есть позицию 0 ? (читать всё…)

Можно сделать на весь экран вопроизведение? Чтобы чисто окно проигрывателя было без кнопок Play. Stop и т.д.? (читать всё…)

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

Прошу помочь с таким вопросом: «Имеется DBGrid, в нем есть различные поля, среди них , поле «Ссылка», которое содержит ссылку на файл. Так вот как сделать сохранение файлов из DBGrid? Чтобы нажать кнопку сохранить, затем создаем папку и сохраняем туда все файлы, которые в данный момент есть в DBGrid» (читать всё…)

Хотелось бы узнать следующее: Есть ли способ в рамках другого запущенного в системе приложения узнать путь открытого в настоящий момент в Delphi проекта. Просто пишу программку для себя, которая бы как-то упорядочивала все мои разработки в одну папку(создавала бы ссылки на них). Может в реестре или еще где. (читать всё…)

xRamzeSx

procedure TForm1.Button1Click(Sender: TObject);

var

bmp: TBitmap;

DC: HDC;

begin

bmp:=TBitmap.Create;
bmp.Width:=1024;

bmp.Height:=768;
DC:=GetDC(0);
bitblt(bmp.Canvas.Handle, 0, 0, Screen.Width, Screen.Height,

DC, 0, 0, SRCCOPY);
bmp.SaveToFile(FormatDateTime('dd/mm/yy, hh-nn-ss', Now) + '.bmp');
ReleaseDC(0, DC);
bmp.Free;

end;

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

возможно ли по нажатию Tbutton заполнить первый столбец Tstringgridа чекбоксом через строчку, то есть две фиксированные строки пропускаем, затем идет чекбокс, затем пусто, затем еще один чекбокс, если да, то как? и возможно ли проверить чекбоксы каких строк оказались активными? (читать всё…)

Есть некий сервер со своим протоколом. Ему необходимо передавать изображение в виде строки, сжатой в base64, в теле XML файла. Вопрос в кодировании картинки как строки в base64. (читать всё…)