Добро пожаловать в форум, Guest  >>   Войти | Регистрация | Поиск | Правила | В избранное | Подписаться
Все форумы / Delphi Новый топик    Ответить
Топик располагается на нескольких страницах: 1 2      [все]
 Исходники на печать  [new]
Penner
Member

Откуда:
Сообщений: 274
Есть большой проект.
Необходимо распечатать весь код (PDF).
Кто-нибудь делал?
4 окт 17, 19:32    [20843379]     Ответить | Цитировать Сообщить модератору
 Re: Исходники на печать  [new]
чччД
Guest
Penner,

тут java нужна. Или другой язык с автоматическим управлением памятью.
4 окт 17, 19:47    [20843429]     Ответить | Цитировать Сообщить модератору
 Re: Исходники на печать  [new]
YuRock
Member

Откуда: Донецк
Сообщений: 2476
чччД
Penner,

тут java нужна. Или другой язык с автоматическим управлением памятью.
И желательно из андроида печатать.
4 окт 17, 19:56    [20843442]     Ответить | Цитировать Сообщить модератору
 Re: Исходники на печать  [new]
DimaBr
Member

Откуда:
Сообщений: 10274
Какая java ? Не мелите чушь !!!
Компонент TProjectToPDF, в свойствах указываешь свой проект и из дизайнера генерируется готовый файл.
4 окт 17, 21:55    [20843743]     Ответить | Цитировать Сообщить модератору
 Re: Исходники на печать  [new]
Penner
Member

Откуда:
Сообщений: 274
TProjectToPDF не нашёл (Delphi XE3)
5 окт 17, 09:18    [20844203]     Ответить | Цитировать Сообщить модератору
 Re: Исходники на печать  [new]
DesWind
Member

Откуда:
Сообщений: 66
Penner,

В Win10 есть принтер который печатает в файл PDF
5 окт 17, 12:11    [20844929]     Ответить | Цитировать Сообщить модератору
 Re: Исходники на печать  [new]
Penner
Member

Откуда:
Сообщений: 274
как напечатать в PDF я знаю
как создать этот PDF?
TProjectToPDF не нашёл
5 окт 17, 13:14    [20845184]     Ответить | Цитировать Сообщить модератору
 Re: Исходники на печать  [new]
DarkMaster
Member

Откуда: Donetsk,Ukraine
Сообщений: 5630
Penner,

Ты не можешь файл сконвертировать в PDF и напечатать полученное? На кой тебе вообще какие-то компоненты и библиотеки, если все это делается штатными средствами Windows?
5 окт 17, 13:17    [20845195]     Ответить | Цитировать Сообщить модератору
 Re: Исходники на печать  [new]
wadman
Member

Откуда: Санкт-Петербург
Сообщений: 23234
Penner
TProjectToPDF не нашёл

Шутят они, шутят.

Придется писать самому. Либо просто печатать правой кнопкой, натравив блокнот на файлы с расширением pas (добавить строчку в реестре, как у блокнота команда "Печать" на txt).
5 окт 17, 13:18    [20845197]     Ответить | Цитировать Сообщить модератору
 Re: Исходники на печать  [new]
Penner
Member

Откуда:
Сообщений: 274
[quot Penner]Есть большой проект.
Необходимо распечатать весь код (PDF).
[quot]
5 окт 17, 13:49    [20845327]     Ответить | Цитировать Сообщить модератору
 Re: Исходники на печать  [new]
DimaBr
Member

Откуда:
Сообщений: 10274
Весь код, со всеми компонентами ?
5 окт 17, 14:09    [20845401]     Ответить | Цитировать Сообщить модератору
 Re: Исходники на печать  [new]
DarkMaster
Member

Откуда: Donetsk,Ukraine
Сообщений: 5630
DimaBr,

Та тролль это... Дайте ТС уже разрешение - пусть печатает, раз ему нужно.
5 окт 17, 14:26    [20845460]     Ответить | Цитировать Сообщить модератору
 Re: Исходники на печать  [new]
Няшик
Member

Откуда: Екатеринбург
Сообщений: 728
https://github.com/search?l=Pascal&q=pdf&type=Code&utf8=?
5 окт 17, 14:47    [20845540]     Ответить | Цитировать Сообщить модератору
 Re: Исходники на печать  [new]
_Vasilisk_
Member

Откуда: Украина, Харьков
Сообщений: 9917
Penner
Необходимо распечатать весь код
Для начала определитесь что такое "Весь код"? dfm? Нужно печатать? А SysUtils.pas? А исходники какого-нибудь DevExpress или Jedi?
5 окт 17, 15:20    [20845655]     Ответить | Цитировать Сообщить модератору
 Re: Исходники на печать  [new]
SimplTsar
Member

Откуда:
Сообщений: 39
Penner
... как создать этот PDF? ...

Например, с помощью LibreOffice (http://www.libreoffice.org/download/download/ или http://www.libreoffice.org/download/portable-versions/)
5 окт 17, 15:22    [20845673]     Ответить | Цитировать Сообщить модератору
 Re: Исходники на печать  [new]
Любезный
Member

Откуда:
Сообщений: 441
А потом он же будет искать здесь TPDFtoProject :)
5 окт 17, 15:28    [20845695]     Ответить | Цитировать Сообщить модератору
 Re: Исходники на печать  [new]
DimaBr
Member

Откуда:
Сообщений: 10274
Картинка с другого сайта.
5 окт 17, 15:55    [20845793]     Ответить | Цитировать Сообщить модератору
 Re: Исходники на печать  [new]
wadman
Member

Откуда: Санкт-Петербург
Сообщений: 23234
DimaBr
Картинка с другого сайта.

Не поленился же иконку запилить.
5 окт 17, 16:06    [20845827]     Ответить | Цитировать Сообщить модератору
 Re: Исходники на печать  [new]
_Vasilisk_
Member

Откуда: Украина, Харьков
Сообщений: 9917
wadman
Не поленился же иконку запилить.
А в иконке бага
5 окт 17, 16:14    [20845853]     Ответить | Цитировать Сообщить модератору
 Re: Исходники на печать  [new]
DarkMaster
Member

Откуда: Donetsk,Ukraine
Сообщений: 5630
_Vasilisk_,

Бог с ней с иконкой - у ТС бага намного глубже сидит - пропадает человек, понимаешь, а вы ""иконки, иконки...".
5 окт 17, 16:18    [20845867]     Ответить | Цитировать Сообщить модератору
 Re: Исходники на печать  [new]
Няшик
Member

Откуда: Екатеринбург
Сообщений: 728
Я кстати скинул ссылку, только самый ленивый человек там не найдёт что - то подобное

https://github.com/biznow/simdesign/tree/87fdcc43f3a71016280cdbfc11de6cf4dd836254/simlib/nativepdf
5 окт 17, 16:46    [20845949]     Ответить | Цитировать Сообщить модератору
 Re: Исходники на печать  [new]
DarkMaster
Member

Откуда: Donetsk,Ukraine
Сообщений: 5630
Няшик,

Я что-то боюсь, что ТС пытается глотать бильярдный шар.
5 окт 17, 16:47    [20845958]     Ответить | Цитировать Сообщить модератору
 Re: Исходники на печать  [new]
Няшик
Member

Откуда: Екатеринбург
Сообщений: 728
DarkMaster
Няшик,

Я что-то боюсь, что ТС пытается глотать бильярдный шар.


Может быть. К тому времени, я уже в гугле нашёл даже статью где все способы работы с PDF написаны

http://www.webdelphi.ru/2013/06/obzor-5-reshenij-dlya-sozdaniya-i-raboty-s-pdf-v-delphi/
5 окт 17, 16:51    [20845967]     Ответить | Цитировать Сообщить модератору
 Re: Исходники на печать  [new]
Penner
Member

Откуда:
Сообщений: 274
весь код = свой код, без SysUtils.pas, DevExpress, Jedi....
5 окт 17, 20:45    [20846484]     Ответить | Цитировать Сообщить модератору
 Re: Исходники на печать  [new]
alekcvp
Member

Откуда:
Сообщений: 525
GExperts -> Source Export -> получаем rtf, далее его в Word или аналог и причёсывем как хочется.
Потом распечатать на любом PDF принтере (в Windows 10 вроде есть встроенный).
5 окт 17, 21:52    [20846586]     Ответить | Цитировать Сообщить модератору
 Re: Исходники на печать  [new]
Penner
Member

Откуда:
Сообщений: 274
alekcvp
GExperts -> Source Export -> получаем rtf, далее его в Word или аналог и причёсывем как хочется.
Потом распечатать на любом PDF принтере (в Windows 10 вроде есть встроенный).


каждый модуль вручную :(
5 окт 17, 22:14    [20846662]     Ответить | Цитировать Сообщить модератору
 Re: Исходники на печать  [new]
Exteris
Member

Откуда: Новосибирск
Сообщений: 910
В Far-е, если слышал про такой, можно выделить все файлы и скопировать их все в один файл. А там уж конвертируй как-хошь.
6 окт 17, 07:52    [20847007]     Ответить | Цитировать Сообщить модератору
 Re: Исходники на печать  [new]
Exteris
Member

Откуда: Новосибирск
Сообщений: 910
Да вообще тьма вариантов. Нафиг тут делфи.
6 окт 17, 07:53    [20847008]     Ответить | Цитировать Сообщить модератору
 Re: Исходники на печать  [new]
Граур Станислав
Member

Откуда:
Сообщений: 871
Penner
alekcvp
GExperts -> Source Export -> получаем rtf, далее его в Word или аналог и причёсывем как хочется.
Потом распечатать на любом PDF принтере (в Windows 10 вроде есть встроенный).


каждый модуль вручную :(


1) Найди способ печатать один pas-файл в pdf.
2) Затем напиши скрипт на cmd/bat/delphi/еще куча языков, который будет обходить дерево каталогов с исходниками и печатать в pdf
6 окт 17, 10:08    [20847246]     Ответить | Цитировать Сообщить модератору
 Re: Исходники на печать  [new]
softwarer
Member

Откуда: 127.0.0.1
Сообщений: 51475
Блог
Exteris
Да вообще тьма вариантов. Нафиг тут делфи.

Я уже предвкушаю следующий вопрос (вспоминая тот проект, на котором заказчик потребовал вставить полные исходники в документацию, как одно из приложений. в один вордовый документ. мы это сделали)
6 окт 17, 11:08    [20847449]     Ответить | Цитировать Сообщить модератору
 Re: Исходники на печать  [new]
под ван
Guest
Ставишь плагин "Print All" для Notepad++ > выделяешь все pas-файлы > ПКМ > Edit with Notepad++ > профит.
6 окт 17, 11:38    [20847548]     Ответить | Цитировать Сообщить модератору
 Re: Исходники на печать  [new]
незваныйГость
Guest
Penner
каждый модуль вручную :(

Фрагмент из рабочей утилиты по преобразованию rtf в doc средствами ms-office
var
  FWordApp: OleVariant;

  FWordApp := CreateOleObject('Word.Application');

procedure ProcessOneFile(const FileName: TFileName);
var
  _Name: WideString;
begin
  if VarIsEmpty(FWordApp) or VarIsNull(FWordApp) then Exit;
  _Name := FileName;
  try
    FWordApp.Documents.Open(_Name);
    _Name := copy(FileName, 1, Length(FileName) - 3) + 'doc';
    try
      FWordApp.ActiveDocument.SaveAs(_Name);
    except
      on E: Exception do begin
        showmessage(e.Message);
      end;
    end;
    FWordApp.ActiveDocument.Close;
  finally
    _Name := '';
  end;
end;
6 окт 17, 12:37    [20847868]     Ответить | Цитировать Сообщить модератору
 Re: Исходники на печать  [new]
_Vasilisk_
Member

Откуда: Украина, Харьков
Сообщений: 9917
Penner
свой код, без SysUtils.pas, DevExpress, Jedi....
Еще раз - определите термин "свой код"? Если Вас устроит определение "Все модули, которые включены в проект" то пишется простой эксперт, который напечатает Вам файлы. Если же "все модули, которые лежат в папке проекта" то еще проще - пишете bat файл
6 окт 17, 16:04    [20848816]     Ответить | Цитировать Сообщить модератору
 Re: Исходники на печать  [new]
JaDi
Member

Откуда: Сызрань, Россия
Сообщений: 3207
незваныйГость,

зачем локальную _Name: WideString; затирать пустым значением в конце?
6 окт 17, 16:45    [20848987]     Ответить | Цитировать Сообщить модератору
 Re: Исходники на печать  [new]
незваныйГость
Guest
JaDi
незваныйГость,
зачем локальную _Name: WideString; затирать пустым значением в конце?

По инерции: создал динамическую переменную - очисть. Хуже от этого не будет. Хотя можно и не очищать.
6 окт 17, 17:51    [20849216]     Ответить | Цитировать Сообщить модератору
Топик располагается на нескольких страницах: 1 2      [все]
Все форумы / Delphi Ответить