Раздел: Общие вопросы Delphi
12.05.2024, 05:32
|
|
Ответов: 14
Просмотров: 1,296
|
|
Раздел: Общие вопросы Delphi
12.05.2024, 03:04
|
|
Ответов: 14
Просмотров: 1,296
|
|
Раздел: Общие вопросы Delphi
12.05.2024, 02:35
|
|
Ответов: 14
Просмотров: 1,296
Нашёл вот тут...
Нашёл вот тут (https://www.tek-tips.com/faqs.cfm?fid=7402) принципиально другое решение (переделал под себя), по сравнению с большинством описанных в интернете.
Unit unMethods;
Interface
Uses...
|
|
Раздел: Общие вопросы Delphi
11.05.2024, 23:19
|
|
Ответов: 14
Просмотров: 1,296
|
|
Раздел: Общие вопросы Delphi
11.05.2024, 20:52
|
|
Ответов: 14
Просмотров: 1,296
2 northener,
Код функции:
function...
2 northener,
Код функции:
function TfrmMain.GetConsoleOutput(const CommandLine:string): string;
var
SA: TSecurityAttributes;
SI: TStartupInfo;
PI: TProcessInformation;
...
|
|
Раздел: Общие вопросы Delphi
11.05.2024, 03:27
|
|
Ответов: 14
Просмотров: 1,296
|
|
Раздел: Общие вопросы Delphi
11.05.2024, 00:55
|
|
Ответов: 14
Просмотров: 1,296
2 northener, не работает - выводит в memo текст...
2 northener, не работает - выводит в memo текст только после завершения консольного приложения. Как и опробованный мною до этого вариант. Проверяю элементарно - добавляю в папку заведомо большой файл...
|
|
Раздел: Общие вопросы Delphi
02.05.2024, 23:55
|
|
Ответов: 14
Просмотров: 1,296
|
|
Раздел: Общие вопросы Delphi
18.03.2024, 02:08
|
|
Ответов: 4
Просмотров: 1,422
Решение для TJPEGImage:
Procedure...
Решение для TJPEGImage:
Procedure TileBG_JPG(imgBG : TImage; SDBV : TServerDBVars);
Var
srcImg : TImage;
X, Y, dX, dY : Integer;
Begin
srcImg:=TImage.Create(frmMain);
...
|
|
Раздел: Общие вопросы Delphi
16.03.2024, 18:50
|
|
Ответов: 4
Просмотров: 1,422
|
|
Раздел: Общие вопросы Delphi
16.03.2024, 18:29
|
|
Ответов: 4
Просмотров: 1,422
Бинго!
bmpImage:=TBitmap.Create;
...
Бинго!
bmpImage:=TBitmap.Create;
Try
imgBG.Picture:=Nil;//Эта строчка оказалась решающей (в предыдущей части кода в TImage была загружена картинка, которая мешает, как...
|
|
Раздел: Общие вопросы Delphi
16.03.2024, 18:19
|
|
Ответов: 4
Просмотров: 1,422
|
|
Раздел: Общие вопросы Delphi
16.03.2024, 18:06
|
|
Ответов: 4
Просмотров: 1,422
Delphi 7 : TImage Tile
Всем доброго времени суток!
Нужно "замостить" TImage маленьким изображением.
bmpImage:=TBitmap.Create;
Try
bmpImage.LoadFromFile(...); //Загружаю BMP-файл размером...
|
|
Раздел: HTML и CSS
23.02.2024, 07:53
|
|
Ответов: 3
Просмотров: 2,820
|
|
Раздел: Microsoft Office Access
23.02.2024, 07:42
|
|
Ответов: 5
Просмотров: 1,487
Ещё вариант: Left([F13],6 это же функция...
Ещё вариант: Left([F13],6 это же функция обработки строки? Стоит проверить есть ли эта функция в принципе в этой версии Office. Вдруг её переделали во что-то типа LeftStr? От M$ можно и такого...
|
|
Раздел: Microsoft Office Access
23.02.2024, 07:30
|
|
Ответов: 5
Просмотров: 1,487
|
|
Раздел: Общие вопросы Delphi
04.02.2024, 19:20
|
|
Ответов: 7
Просмотров: 1,407
|
|
Раздел: Общие вопросы Delphi
04.02.2024, 17:33
|
|
Ответов: 7
Просмотров: 1,407
У меня TPanel сейчас длиннее экрана в несколько...
У меня TPanel сейчас длиннее экрана в несколько раз. Да, мне нужна распечатка отчёта. Поставил FastReports 6.9.14, так мало того, что там чекбокс - это кривая галочка на пустом месте и "будь любезен...
|
|
Раздел: Общие вопросы Delphi
04.02.2024, 17:28
|
|
Ответов: 7
Просмотров: 1,407
With Printer Do
Begin
BeginDoc;
...
With Printer Do
Begin
BeginDoc;
frmMain.pnlBase.PaintTo(Printer.Canvas, 10, 10);
EndDoc;
End;
Этот способ печатает TPanel целиком, однако CheckBox'ы по-прежнему без галочек....
|
|
Раздел: Общие вопросы Delphi
04.02.2024, 16:40
|
|
Ответов: 7
Просмотров: 1,407
With Printer Do
Begin
BeginDoc;
...
With Printer Do
Begin
BeginDoc;
frmMain.pnlBase.PaintTo(Printer.Canvas, 10, 10);
EndDoc;
End;
Печатает TPanel целиком, однако CheckBox'ы по-прежнему без галочек.
|
|
Раздел: Общие вопросы Delphi
04.02.2024, 16:21
|
|
Ответов: 7
Просмотров: 1,407
frmMain.Print;
Печатает CheckBox'ы, однако у...
frmMain.Print;
Печатает CheckBox'ы, однако у меня на форме расположена TPanel, которую я проматываю TScrollBar'ом. А именно так: я продвигаю TPanel снизу вверх за пределы формы, т.к. TPanel намного...
|
|
Раздел: Общие вопросы Delphi
04.02.2024, 15:53
|
|
Ответов: 7
Просмотров: 1,407
|
|
Раздел: Общие вопросы по программированию, компьютерный форум
04.02.2024, 15:39
|
|
Ответов: 35
Просмотров: 3,397
|
|
Раздел: Фриланс
24.11.2023, 22:17
|
|
Ответов: 1
Просмотров: 2,521
|
|
Раздел: Общие вопросы Delphi
27.10.2023, 23:10
|
|
Ответов: 3
Просмотров: 1,622
Ликбез
Procedure MultiStrSQL(mstrSQL : TStrings);
Var
strDBPath : String;
sqlDB : TSQLiteDatabase;
i : Integer;
Begin
...
|
