Search Forum Home   Visual FoxPro  Rapoarte si generatoare de rapoarte  implementare co...  implementare contract in raport    10/5/2009 10:48:00 AM pd 148 posts implementare contract in raport  (N/A) Trebuie sa implementez un contract de 5 pagini intr-o aplicatie. Textul l-am primit in MS Word. Cum as putea implementa in aplicatie (intr-un raport) textul din document?  10/5/2009 12:09:35 PM Daniel Buduru 1436 posts Re: implementare contract in raport  (N/A)  Poti salva documentul word in format rtf. Aici ai un exemplu de cod pentru a imprima texul rtf intr-un raport: How to apply rich text effects in Visual FoxPro reports iar aici o alta varianta: http://www.universalthread.com/Report.aspx?Session=7156442F54464464636A493D2068704B4172385A47463144685A75467752317448722B35547376726E5953436D Daniel Buduru  2/18/2010 5:11:36 PM gillmifus 40 posts Re: implementare contract in raport  (N/A)  Am si eu un contract in care schimb doar citeva date, cele ale beneficiarului, pe care le iau dintr-un .dbf. Am dat ctrl+c,v din word si am scris intr-un prg continutul intre SET TEXTMERGE TO contract.txt SET TEXTMERGE ON \contract, etc Problema este ca il aliniaza cam aiurea si nu am nici margine de indosariere, as vrea sa dau si un bold, ceva, font,etc. Am dat tab dar nu iese super, problema nu ma deranjeaza f.tare, trebuie sa iasa totusi cit de cit, dar f.repede si nimic complicat. Un sfat, sugestii, cit mai simplu si eficient. Gill (vfp.7)  2/18/2010 8:06:56 PM Daniel Buduru 1436 posts Re: implementare contract in raport  (N/A)  Tehnoredacteaza mai intai contractul. Daca optezi pentru varianta cu Richtext, il poti edita in word si il salvezi in format rtf. Mai ai o optiune, format HTML. In acest caz, il editezi intr-un editor HTML. Cel mai accesibil e OutlookExpress. Compui un mesaj nou, ii pui fonturile si ce mai doresti. Cand esti gata, selectezi tabul Source - e in partea de jos a ferestrei - si vei avea in fereastra codul html. Il iei cu copy/paste intr-un camp memo sau il salvezi in fisier text. In oricare din variante, pune in text un placeholder (ceva care tine locul) pentru datele beneficiarului. De exemplu, in loc de un beneficiar anume scrii **SOCIETATE BENEFICIAR**, **ADRESA BENEFICIAR** si tot asa. Asta va fi macheta. Cand vrei sa tiparesti, copiezi fisierul sau campul memo intr-un string, apoi faci inlocuirile: lcContract=FILETOSTR('fisiercontract.extensie') lcContract=STRTRAN(lcContract,'**SOCIETATE BEBEFICIAR**', numele_beneficiarului) lcContract=STRTRAN(lcContract,'**ADRESA BENEFICIAR**', adresa_beneficiarului) si tot asa. Poti  pune <<numele_beneficiarului>> in textul contractului, in loc de **SOCIETATE BENEFICIAR** In acest caz, inlocuirea o faci cu TEXTMERGE() lcContract=TEXTMERGE(lcContract) Apoi il tiparesti in varianta aleasa - rtf sau HTML. Daniel Buduru  2/18/2010 8:47:49 PM gillmifus 40 posts Re: implementare contract in raport  (N/A) Cum listez un fisier.txt direct din .prg, parca era "run print contract.txt" ? Am rezolvat simplu cu set text...a iesit ok. Mai am de lucrat la salvarea "fisier.txt"  Page 1 of 1   Visual FoxPro  Rapoarte si generatoare de rapoarte  implementare co... Flat View Tree View Oldest To Newest Newest To Oldest