Search  
Friday, May 25, 2012 ..:: Forum ::.. Register  Login
 Forum Minimize
Pentru a putea posta mesaje trebuie să vă înregistraţi.
Notă: Mesajele cu conţinut jignitor sau ilegal (inclusiv cereri de soft piratat) nu sunt acceptate şi vor fi şterse imediat .

Pentru a primi raspunsuri rapide si corecte, scrieti in mesaj ce intentionati sa faceti, ce mesaj de eroare primiti, in ce context si in urma caror actiuni. De asemenea, mentionati versiunea de FoxPro in care lucrati!
Dacă nu specificați versiunea, se consideră VFP 9.0 SP2.

SearchForum Home
  Visual FoxPro  Controale ActiveX  RichText Contro...
 RichText Control
 
 8/15/2005 2:27:56 PM
User is offlineAdrian Vari
138 posts
5th




RichText Control
 (Romania)
Salut baieti,

Am si eu o problema - vreau sa folosesc RichText Control pentru a scoate un text formatat si am gasit un exemplu in VFP9.
 Ce nu stiu eu este cum pot scrie programatic in acest control si cum stabilesc, inainte sa scriu, formatarea dorita.
Apoi as introduce aici si vreo doua poze.

Stie cineva cum se face asta?

Multumesc.

Adrian Vari
 8/15/2005 2:45:33 PM
User is offlineanonymous
0 posts


Re: RichText Control
 (Romania)

O poza din cate am vazut se poate pune in control doar incarcand-o in clipboar si dupa aceea folosind functia API SendMessage. Cat despre formatarea programatic, daca te uiti in Solution Sample gasesti un exemplu de cum se foloseste RichTextBox-ul si poti vedea cum se formateaza, de ex. pt. a face bold text-ul selectat in control:

THISFORM.oRichTb.SelBold = .T., cam asa se folosesc si restul

 8/15/2005 3:01:22 PM
User is offlineAdrian Vari
138 posts
5th




Re: RichText Control
 (Romania)
Pai daca selectez textul apoi il pot formata ... insa eu vreau sa calculez ceva iar apoi sa scriu cumva din program valoarea rezultata in continuarea textului si vreau sa o mai si colorez cu iif.

Deci nu vreau sa scriu ca in MSWORD si ca la automatizarea MSWORD.



Adrian Vari
 8/15/2005 3:04:16 PM
User is offlineGrigore Dolghin
3592 posts
www.class-software.eu
1st






Re: RichText Control
 (Romania)
ThisForm.oRichText.Object.Text = "Iata ce pot face doua maini dibace." + Chr(13)
ThisForm.oRichText.Object.SelStart = 12
ThisForm.oRichText.Object.SelLength = 4
ThisForm.oRichText.Object.SelBold = .T.
ThisForm.oRichText.Object.SelFontName = "Tahoma"
ThisForm.oRichText.Object.SelFontSize = 20

ThisForm.oRichText.Object.SelStart = 28
ThisForm.oRichText.Object.SelLength = 6
Thisform.oRichText.Object.SelItalic = .T.
Thisform.oRichText.Object.SelBold = .T.
Thisform.oRichText.Object.SelColor = Rgb(255,0,0)
Thisform.oRichText.Object.SelUnderline = .T.

Nu te pot ajuta cu imaginile, din pacate. N-am gasit codul RTF pentru imagine si oricum, imaginile sunt reprezentate text (cam asa: 4e630d6f96a4dbd41ddc6faabf83c680}89504e470d0a1a0a0000000d494844520000004b0000004b08030000000f908ad8000000017352474200aece1ce900000228504c54453334373234365b5c5f50
50504c4d51595a5d5e5e5e585a5d58595d47484a47484958595c57595c4a4c505d5e615f60626263646565657a7a7)


Grigore Dolghin
Visual FoxPro MVP 2006 - 2010
Class Software
My blog
 8/15/2005 3:17:22 PM
User is offlineAdrian Vari
138 posts
5th




Re: RichText Control
 (Romania)
Multumesc

Eu insa as fi vrut sa fac ceva de genul:

Denumire produs (Producator)* (OTC)
   
produsul1   pret1   pret2   pret3
    produsul2   pret1   pret2
    produsul3   pret1   pret2   pret3
Denumire produs (Producator)


...
deci ca intr-un raport cu grupari si tot ce mai trebuie.
Am facut asta cu automatizare WORD dar dureaza o vesnicie din cauza formatarilor (din cauza ca pe aceeasi linie am mai multe formatari )

in word scriam cam asa:
loSelection.Font.Bold = 9999998    && turn on font bold
loSelection.TypeText(STR(pliv,9,2)+CHR(9))
loSelection.Font.Bold = 9999998    && turn off font bold

si asa mai departe

Cu RTFul nu stiu cum sa fac chiar chestia cu
loSelection.TypeText(STR(pliv,9,2)+CHR(9))

Nu stiu daca m-am facut inteles...
Nu stiu daca se poate ce vreau eu...


Adrian Vari
 8/15/2005 3:20:51 PM
User is offlineanonymous
0 posts


Re: RichText Control
 (Romania)

Pai ti-a explicat Grig mai sus:

Aici nu faci ceva gen html adica sa incepi sa scrii bold scrii text si opresti bold. Aici scrii textul, apoi il selectezi apoi: il faci bold cu comanda: ThisForm.oRichText.Object.SelBold = .T., deci va trebui sa stii la al catelea caracter esti si cate caractere sunt.

 8/15/2005 7:33:14 PM
User is offlineAdrian Vari
138 posts
5th




Re: RichText Control
 (Romania)
Va multumesc pentru raspunsurile date.

Adrian Vari
  Visual FoxPro  Controale ActiveX  RichText Contro...

Search  Forum Home         

 Google Ads Minimize

    

Copyright 2002-2010 Profox   Terms Of Use  Privacy Statement