dorneles Posted January 28, 2008 Report Share Posted January 28, 2008 How do you add on the list of dataset? FW 2.6 + HB 0.9950 + Pelles + Clipper 5.3 + VLib + xDevStudio Quote Link to comment Share on other sites More sharing options...
Spirin Sergey Posted January 29, 2008 Author Report Share Posted January 29, 2008 citação:How do you add on the list of dataset? id=quote>id=quote>Such variants: - :SetWorkArea() - method - :SetUserDataSet() - method - frxHarbourWorkArea placing at left "Data"-Tab (this one "lives" at its report only and always active for report). :ClearDataSets() - method clear list of datasets (but not frxHarbourWorkArea). What problem do you have? --- Spirin Sergey. "Paritet Soft" Company. FRH beta: http://www.paritetsoft.ru/frh.htm FRAX sales: http://www.hotsoft.ru/ALASKA/frax_eng.htm P.S. At time of your last message it was 3 o'clock in the morning at Moscow. So sorry for a pause ) Quote Link to comment Share on other sites More sharing options...
dorneles Posted January 29, 2008 Report Share Posted January 29, 2008 FrPrn:SetWorkArea("Cliente", 1) FrPrn:SetFieldAliases("Cliente", "codigo=Cust No;Cliente;ADDR1=Endereco;Fone1;Fone2;Contato") lShowCustName := .t. DoFrAction("rel.fr3") FrPrn:ClearDataSets() lShowCustName := .f. DoFrAction("rel.fr3") The error that this line, this seeking another dataset. FW 2.6 + HB 0.9950 + Pelles + Clipper 5.3 + VLib + xDevStudio Quote Link to comment Share on other sites More sharing options...
qiinfo Posted January 29, 2008 Report Share Posted January 29, 2008 Olá Sprin, >I do not see where UnloadFr()is called, why? Yes, yes, yes, Now works 100% Na verdade eu fiz os meus testes encima do exemplo evandro, e lá ele também não fez a chamada a função UnloadFr(). O engraçado é que se você não "xpthemas" não ocorre o erro de GPF, mas agora está funcionando 100%, Muito obrigado, Rossine FW 2.2c + @say + Clipper 5.2e + libs 5.3b / FWH 2.7 + @say + xHarbour Divinópolis/ MG Quote Link to comment Share on other sites More sharing options...
Spirin Sergey Posted January 29, 2008 Author Report Share Posted January 29, 2008 citação:FrPrn:SetWorkArea("Cliente", 1) FrPrn:SetFieldAliases("Cliente", "codigo=Cust No;Cliente;ADDR1=Endereco;Fone1;Fone2;Contato") lShowCustName := .t. DoFrAction("rel.fr3") FrPrn:ClearDataSets() lShowCustName := .f. DoFrAction("rel.fr3") The error that this line, this seeking another dataset. id=quote>id=quote>rel.fr3 is a copy of 1.fr3? So it's correct because you call ShowReport() but report "remembers" their datasets. So call DesignReport() and correct rel.fr3. I copied your code аnd do the same: http://www.paritetsoft.ru/rel.JPG --- Spirin Sergey. "Paritet Soft" Company. FRH beta: http://www.paritetsoft.ru/frh.htm FRAX sales: http://www.hotsoft.ru/ALASKA/frax_eng.htm Quote Link to comment Share on other sites More sharing options...
Spirin Sergey Posted January 29, 2008 Author Report Share Posted January 29, 2008 citação:>I do not see where UnloadFr()is called, why? Na verdade eu fiz os meus testes encima do exemplo evandro, e lá ele também não fez a chamada a função UnloadFr(). O engraçado é que se você não "xpthemas" não ocorre o erro de GPF, mas agora está funcionando 100%, id=quote>id=quote>Ok. Do you test it at Win98/ME? Because at XP I can not reproduce. XPManifest declare what version of ComCtrl32.dll can be used. So diffrrent library and can be diffrrent result of resource leak. Quote Link to comment Share on other sites More sharing options...
qiinfo Posted January 29, 2008 Report Share Posted January 29, 2008 Olá, citação:Do you test it at Win98/ME? id=quote>id=quote>Eu fiz meus testes no windows XP SP2. Agora está ok Obrigado, Rossine FW 2.2c + @say + Clipper 5.2e + libs 5.3b / FWH 2.7 + @say + xHarbour Divinópolis/ MG Quote Link to comment Share on other sites More sharing options...
dorneles Posted January 29, 2008 Report Share Posted January 29, 2008 Создание новой пÑевдоним? Ð’ FastReport ÐлÑÑка имеет XBase.pdf Создание новой пÑевдоним? Ð’ FastReport ÐлÑÑка имеет XBase.pdf определение облаÑтей работы Ñ XBase + +, но не нашел. Alguem já consegui, fazer um novo relatorio com banco.dbf diferente do exemplo? FW 2.6 + HB 0.9950 + Pelles + Clipper 5.3 + VLib + xDevStudio Editado por - dorneles on 29/01/2008 13:45:46 Quote Link to comment Share on other sites More sharing options...
Spirin Sergey Posted January 29, 2008 Author Report Share Posted January 29, 2008 citação:Создание новой пÑевдоним? Ð’ FastReport ÐлÑÑка имеет XBase.pdf Создание новой пÑевдоним? Ð’ FastReport ÐлÑÑка имеет XBase.pdf определение облаÑтей работы Ñ XBase + +, но не нашел. id=quote>id=quote>Fantastic! Do you speak Russian? )) Ok. 1-st variant with :SetWorkArea(): USE banco.dbf NEW FrPrn:SetWorkArea("My banco", select("banco")) FrPrn:DesignReport() 2-nd variant with frxHarbourWorkArea: USE banco.dbf NEW FrPrn:DesignReport() Place HarbourWorkArea-object Select Alias "banco" from list. 3-d variant with frxHarbourWorkArea: FrPrn:DesignReport() Place HarbourWorkArea-object Set AlreadyUse property to False. Set TableName property to "C:\banco.dbf" (for example) Do you understand? Properties Alias and WorkArea will filled auto in 3-d case. Quote Link to comment Share on other sites More sharing options...
evandro Posted January 29, 2008 Report Share Posted January 29, 2008 Olá, citação:Fantastic! Do you speak Russian? )) id=quote>id=quote>Só se ele estiver muito bêbado. Hehehehe Como disse antes, viajo bastante, como foi o caso. Só cheguei agora, daà a demora em responder. citação:But why you have not made a choice of language and viewing of process? Were afraid to not be in time? ))) id=quote>id=quote>Of course, certainly !! citação:Let's for pleasure we'll complete together a little bit? ) Ok? id=quote>id=quote>Ok. citação:And what your impressions? id=quote>id=quote>Muito boas. Sempre achei o FastReport o melhor construtor de relatórios. Só não tinha como usá-lo. Pessoal, vejam as exportações. Já trabalhei com planilhas exportadas do Crystal e outros e é um lixo, mas do FR é show. Disparado. Agora só falta acessar o MySql que não estou conseguindo, para adotá-lo de vez. citação:How do you connect to MySql? id=quote>id=quote>Instalei o driver ODBCF do MySql, fui no modo de edição do FRH, criei um novo relatório, e abri uma conexão com o BD. Ele chama a tela para conexão. No botão "Testar conexão" diz que está ok. Mas no relatório pede a senha do BD várias vezes mas não conecta. Diz que tem um "erro catastrófico". []s, Evandro G. de Paula Curvelo - MG evandro@skillnet.com.br (Escr. - na Cidade) imortal@skillnet.com.br (Res. - na Roça) FWH 2.6+PellesC+MyMake+xHarbour.org 0.99.5+SqlLib I PREPARATÓRIO PARA O VI ENCONTRO FIVEWIN - JULHO/2008 - CURVELO - MG Editado por - evandro on 29/01/2008 21:52:45 Quote Link to comment Share on other sites More sharing options...
Spirin Sergey Posted January 30, 2008 Author Report Share Posted January 30, 2008 citação: citação:How do you connect to MySql? id=quote>id=quote>Instalei o driver ODBCF do MySql, fui no modo de edição do FRH, criei um novo relatório, e abri uma conexão com o BD. Ele chama a tela para conexão. No botão "Testar conexão" diz que está ok. Mas no relatório pede a senha do BD várias vezes mas não conecta. Diz que tem um "erro catastrófico". id=quote>id=quote>Ok. Let's to understand more precisely. Do you use ADODatabase-object from FRH? What ConnectionString(DataBaseName)? What driver do you use? I do not work with MySQL. But I do not change something at FR ADO. So consult please at: news://newsgroups.fast-report.com/fast-reports.public.fastreport.4 ---------- And on the other hand. How do you use MySQL-data inside your application? Is it RDD? Is it workareas for you? If yes, let's try to use SetWorkArea() etc to work with MySQL-data! --- Spirin Sergey. "Paritet Soft" Company. FRH beta: http://www.paritetsoft.ru/frh.htm FRAX sales: http://www.hotsoft.ru/ALASKA/frax_eng.htm Quote Link to comment Share on other sites More sharing options...
evandro Posted January 30, 2008 Report Share Posted January 30, 2008 Olá, citação:Do you use ADODatabase-object from FRH? What ConnectionString(DataBaseName)? What driver do you use? id=quote>id=quote>Instalei o MyAdoDB ( http://sourceforge.net/projects/myoledb/ ) e consegui buscar os dados. citação:Is it RDD? Is it workareas for you?If yes, let's try to use SetWorkArea() etc to work with MySQL-data! id=quote>id=quote>Uso a SqlLib ( www.sqllib.com.br ). Como gerar um relatório baseado em um vetor? Tem jeito? []s, Evandro G. de Paula Curvelo - MG evandro@skillnet.com.br (Escr. - na Cidade) imortal@skillnet.com.br (Res. - na Roça) FWH 2.6+PellesC+MyMake+xHarbour.org 0.99.5+SqlLib I PREPARATÓRIO PARA O VI ENCONTRO FIVEWIN - JULHO/2008 - CURVELO - MG Quote Link to comment Share on other sites More sharing options...
Spirin Sergey Posted January 30, 2008 Author Report Share Posted January 30, 2008 Hello, citação:Instalei o MyAdoDB ( http://sourceforge.net/projects/myoledb/ ) e consegui buscar os dados. id=quote>id=quote>And? You can fetch the data... Can you answer more in detail? ) citação:Is it RDD? Is it workareas for you? Uso a SqlLib ( www.sqllib.com.br ). Como gerar um relatório baseado em um vetor? Tem jeito? id=quote>id=quote>And.. Is it RDD? Is it workareas for you?) Sorry, I'm not Harbour-developer. In any case it's possible use UserDataSet. But I am sure that it's possible use MySQL-data in FastReport-ADO and as workarea in your application --- Spirin Sergey. "Paritet Soft" Company. FRH beta: http://www.paritetsoft.ru/frh.htm FRAX sales: http://www.hotsoft.ru/ALASKA/frax_eng.htm Quote Link to comment Share on other sites More sharing options...
aokisantos Posted January 30, 2008 Report Share Posted January 30, 2008 Spirin Sergey, O FastReport, tem que estar instalado no cliente final? Obrigado. Aoki Santos FWH25+XHARB 99.50+WS+SQLLIB+MYSQL Msn: aokisantos@hotmail.com Quote Link to comment Share on other sites More sharing options...
dorneles Posted January 30, 2008 Report Share Posted January 30, 2008 Olá Evandro, estou quase terminando mais falta pouco. Спирин ЗдравÑтвуйте, Ñ Ð´ÐµÐ»Ð°ÑŽ иÑпытание Ñ Ð¸Ñпользованием маÑÑивов в fastreport еÑÑ‚ÑŒ Ñ„ÑƒÐ½ÐºÑ†Ð¸Ñ Ð´Ð»Ñ Ð¿Ñ€Ð¾Ð²ÐµÑ€ÐºÐ¸ того, Ñто в конце лиÑта и Ñоздавать новую Ñтраницу. Я попыталÑÑ, иÑÐ¿Ð¾Ð»ÑŒÐ·ÑƒÑ Prn: NewPage (), он Ñоздает новую Ñтраницу, но пуÑтым. -- Ее Ñоздают краÑочные коробки. -- ЕÑÑ‚ÑŒ ли у Ð²Ð°Ñ Ð¿Ñ€Ð¾Ð³Ð½Ð¾Ð· Ñделать полную верÑию. FW 2.6 + HB 0.9950 + Pelles + Clipper 5.3 + VLib + xDevStudio Quote Link to comment Share on other sites More sharing options...
evandro Posted January 30, 2008 Report Share Posted January 30, 2008 Olá, citação:estou quase terminando mais falta pouco. id=quote>id=quote>Mas com o MySql e SqlLib? []s, Evandro G. de Paula Curvelo - MG evandro@skillnet.com.br (Escr. - na Cidade) imortal@skillnet.com.br (Res. - na Roça) FWH 2.6+PellesC+MyMake+xHarbour.org 0.99.5+SqlLib I PREPARATÓRIO PARA O VI ENCONTRO FIVEWIN - JULHO/2008 - CURVELO - MG Quote Link to comment Share on other sites More sharing options...
Spirin Sergey Posted January 30, 2008 Author Report Share Posted January 30, 2008 citação:O FastReport, tem que estar instalado no cliente final? id=quote>id=quote>FRH is one dll that you can put with your exe, or in the PATH. Quote Link to comment Share on other sites More sharing options...
Spirin Sergey Posted January 30, 2008 Author Report Share Posted January 30, 2008 citação:Спирин ЗдравÑтвуйте, Ñ Ð´ÐµÐ»Ð°ÑŽ иÑпытание Ñ Ð¸Ñпользованием маÑÑивов в fastreport еÑÑ‚ÑŒ Ñ„ÑƒÐ½ÐºÑ†Ð¸Ñ Ð´Ð»Ñ Ð¿Ñ€Ð¾Ð²ÐµÑ€ÐºÐ¸ того, Ñто в конце лиÑта и Ñоздавать новую Ñтраницу. Я попыталÑÑ, иÑÐ¿Ð¾Ð»ÑŒÐ·ÑƒÑ Prn: NewPage (), он Ñоздает новую Ñтраницу, но пуÑтым. -- Ее Ñоздают краÑочные коробки. -- ЕÑÑ‚ÑŒ ли у Ð²Ð°Ñ Ð¿Ñ€Ð¾Ð³Ð½Ð¾Ð· Ñделать полную верÑию. id=quote>id=quote>Мне отвечать по-руÑÑки? Хорошо ))) ИÑпользуйте Ð´Ð»Ñ Ð¼Ð°ÑÑивов, файлов и Ñ‚.д. UserDataSet! Смотрите пример в демо "UserDS and Dialogs". Там печатаетÑÑ Ð¼Ð°ÑÑив. :NewPage() - Ñто только Ð´Ð»Ñ Ð Ð£Ð§ÐОГО отчета. --Про "коробки" непонÑтно --Думаю 2-3 недели. Ðодо почиÑтить баги. Still, translated into English: ) I answer in Russian? Good ))) For arrays, files, etc. use UserDataSet! See example in the demo "UserDS and Dialogs". There array is printed. :NewPage () - this is for MANUAL reports only. -- About "box" inunderstandable. -- I think 2-3 weeks. It's after all bugs detections. Quote Link to comment Share on other sites More sharing options...
evandro Posted January 30, 2008 Report Share Posted January 30, 2008 Olá, citação:O FastReport, tem que estar instalado no cliente final? id=quote>id=quote>Não, não precisa. citação:You can fetch the data... Can you answer more in detail? id=quote>id=quote>Sim, os dados da consulta ficam disponÃveis. Após instalar o MyAdoDb, configure o objeto ADODataBase para ler o banco de dados. Aà é só cadastrar a consulta. []s, Evandro G. de Paula Curvelo - MG evandro@skillnet.com.br (Escr. - na Cidade) imortal@skillnet.com.br (Res. - na Roça) FWH 2.6+PellesC+MyMake+xHarbour.org 0.99.5+SqlLib I PREPARATÓRIO PARA O VI ENCONTRO FIVEWIN - JULHO/2008 - CURVELO - MG Quote Link to comment Share on other sites More sharing options...
evandro Posted January 30, 2008 Report Share Posted January 30, 2008 Olá, citação:Is it RDD? Is it workareas for you?If yes, let's try to use SetWorkArea() etc to work with MySQL-data! id=quote>id=quote>Dá um erro. Porém com vetor, consegui fazer funcionar. Como o RDD pode retornar um vetor, já dá para iniciar o uso do FRH. Mas se desse para usar com SetWorkArea() acho que dá para desfrutar de mais recursos do FRH []s, Evandro G. de Paula Curvelo - MG evandro@skillnet.com.br (Escr. - na Cidade) imortal@skillnet.com.br (Res. - na Roça) FWH 2.6+PellesC+MyMake+xHarbour.org 0.99.5+SqlLib I PREPARATÓRIO PARA O VI ENCONTRO FIVEWIN - JULHO/2008 - CURVELO - MG Editado por - evandro on 30/01/2008 23:19:21 Quote Link to comment Share on other sites More sharing options...
Spirin Sergey Posted January 31, 2008 Author Report Share Posted January 31, 2008 Hello! Full demo-application for FiveWin is added! Download area: http://www.paritetsoft.ru/frh.htm has updated. Now it's possible to download demo-application for FWH. --- Spirin Sergey. "Paritet Soft" Company. FRH beta: http://www.paritetsoft.ru/frh.htm FRAX sales: http://www.hotsoft.ru/ALASKA/frax_eng.htm Quote Link to comment Share on other sites More sharing options...
dorneles Posted January 31, 2008 Report Share Posted January 31, 2008 citação:1-st variant with :SetWorkArea(): USE banco.dbf NEW FrPrn:SetWorkArea("My banco", select("banco")) FrPrn:DesignReport() 2-nd variant with frxHarbourWorkArea: USE banco.dbf NEW FrPrn:DesignReport() Place HarbourWorkArea-object Select Alias "banco" from list. 3-d variant with frxHarbourWorkArea: FrPrn:DesignReport() Place HarbourWorkArea-object Set AlreadyUse property to False. Set TableName property to "C:\banco.dbf" (for example) Do you understand? Properties Alias and WorkArea will filled auto in 3-d case. id=quote>id=quote>http://img84.imageshack.us/my.php?image=imagemhm6.jpg Hello, I am not getting creates a new alias, follow his example above, but when I sign in to DesignReport (), there is the alias, which procedure to create a new alias by DesignReport (), if possible send me an example, or not and the DesignReport () which creates a new alias? Because in all arquivos.fr3 that do already have a CUSTOMER alias. Thanks FW 2.6 + HB 0.9950 + Pelles + Clipper 5.3 + VLib + xDevStudio Quote Link to comment Share on other sites More sharing options...
Spirin Sergey Posted January 31, 2008 Author Report Share Posted January 31, 2008 Hello dorneles. Now I do not understand you. What do you mean under - "create new alias"? Is it - "open dbf"? Or not? --- Spirin Sergey Quote Link to comment Share on other sites More sharing options...
dorneles Posted January 31, 2008 Report Share Posted January 31, 2008 I want to make the relationship. Dbf the report. FW 2.6 + HB 0.9950 + Pelles + Clipper 5.3 + VLib + xDevStudio Quote Link to comment Share on other sites More sharing options...
Spirin Sergey Posted January 31, 2008 Author Report Share Posted January 31, 2008 citação: id=quote>id=quote>AlreadyUse, AlreadyUse, AlreadyUse !!!!!!!!!!!!! If dbf is opened -> AlreadyUse=True, TableName="" If dbf is not opened -> AlreadyUse=False, TableName="bla-bla" citação: 3-d variant with frxHarbourWorkArea: FrPrn:DesignReport() Place HarbourWorkArea-object Set AlreadyUse property to False. !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! Set TableName property to "C:\banco.dbf" (for example) Quote Link to comment Share on other sites More sharing options...
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.