Страница 2 из 2

Re: Своя Form через LinkForm...

Добавлено: 22 авг 2011, 13:33
Masygreen
m0p3e, спасибо за обалденный пример :) как с потоком разберусь так за него и примусь. Дело в том что если я сделаю свою форму - то есть файл или нет я могу сам решить ...

1)я ориентировался на Т-2 из зарплаты, там как раз картинка на уровне потока вставляется

Код: Выделить всё

   t2_136.ShowFile('');
    InsFoto(GetStringParameter('Files', 'OutputFilesDirectory', 0) ,'f_t2_136.rtf',3,5,0);

Re: Своя Form через LinkForm...

Добавлено: 22 авг 2011, 13:33
oiko
Выбор будет всегда если в конфигурационном файле галактики указать
[Forms]
Fcenv=On

Re: Своя Form через LinkForm...

Добавлено: 22 авг 2011, 13:40
Masygreen
oiko писал(а):Выбор будет всегда если в конфигурационном файле галактики указать
[Forms]
Fcenv=On
моя об это не подумал .. щас попробую отключить ....
да все круто .. :) спасибо !!!
---------------------------
ЗЫ. хотел в карму всем - но чудесный движок форума ни фига такого не позволяет .

Re: Своя Form через LinkForm...

Добавлено: 22 авг 2011, 13:41
oiko
Вопрос в чем - статично какой-то логотип засунуть или по условию подгружать разные картинки?
Статично же нормально в ртф можно любую картинку всадить.

Re: Своя Form через LinkForm...

Добавлено: 22 авг 2011, 13:44
Masygreen
oiko писал(а):Вопрос в чем - статично какой-то логотип засунуть или по условию подгружать разные картинки?
Статично же нормально в ртф можно любую картинку всадить.
именно динамичный, и не канает вставка по link (было обсуждение типа пихать все в c:\bmp.bmp, а в rtf туда линк сделать) ... картинка слишком важная и у нее будет каждый раз уникальное имя :)

Re: Своя Form через LinkForm...

Добавлено: 22 авг 2011, 14:18
edward_K
картинку нужно вставлять как то так

Код: Выделить всё

var tFoto : comIMailSend;
......

Код: Выделить всё

  strTmp := GetStringParameter('Files', 'OutputFilesDirectory', 0) + 'tmp.bmp';
   DeleteFile(strTmp);
    if(GetFirst Appendix = tsOK)
    { ExportMemoToFile(Appendix.Contents, strTmp, false);
      PutFileToClient(UserPathVip + 'tmp.bmp', false);
      PutFileToClient(UserPathVip + 'SprMesR.rtf', false);
      tFoto := comIMailSend(new(coMailSend));
      tFoto.OLE_ADD_FOTO(ExDirectoryOut, 'SprMesR.rtf',3,3,15);
   }

Re: Своя Form через LinkForm...

Добавлено: 22 авг 2011, 15:46
Masygreen
все почти сделал.. .но есть вопросы по InsFoto ... открою ка лучше новую тему