Re: [Gambas-user] Displaying the same form n times
Thank you very much :) --- On Tue, 12/21/10, vikram austin...@yahoo.com wrote: From: vikram austin...@yahoo.com Subject: To: self austin...@yahoo.com Date: Tuesday, December 21, 2010, 4:21 AM just use .ShowModal insteed of .show 2010/12/20 vikram austin...@yahoo.com: Hi, Thanks a lot for your response :) This opens all the IP Input dialogs at one go. It would be better if the IP input dialogs were displayed one after the other. Maybe theres a way to link one dialog's Open event to another's Close event, or maybe there is some other way to do this. Thanks again, Vikram --- On Mon, 12/20/10, vikram austin...@yahoo.com wrote: From: vikram austin...@yahoo.com Subject: [Gambas-user] Displaying the same form n times To: austin...@yahoo.com Date: Monday, December 20, 2010, 6:52 AM PUBLIC SUB Button1_Click() DIM count AS Integer dim hForm as IPinput ascount = txtAScount.Text 'Point 1 '''never use underscore in names and str to int is automatic FOR count = 1 TO ascount hForm = New IPinput hForm.show NEXT END in IP Input form add : STATIC PUBLIC aIP as NEW STRING[] PUBLIC SUB Button_Clic() IPInput.aIP.Add(txtInput.Text) END 2010/12/20 vikram austin...@yahoo.com: Hi, I have two forms in my application, the first one asks how many Application Servers to configure, and then displays second one(IP input dialog) for each Application Server. For example if there are 5 Application Server, the IP input dialog is displayed 5 times. I was thinking of calling the IP input dialog from a FOR loop within the first form, PUBLIC SUB Button1_Click() DIM count AS Integer ascount = CInt(txt_AScount.Text) 'Point 1 FOR count = 1 TO ascount IPinput.show NEXT END There are two things I am unsure of here: 1.the number of IP Addresses to be entered is to decided at runtime, I was thinking of storing all IP Addresses entered via the IP input dialog into a String array. But there is no way of deciding what the size of the string array should be till Point 1(marked in code), and it is not possible syntactically to define an array at that point in code. 2.The FOR loop for displaying the IP input dialog is not displaying the form ascount times. It only displays it once. This probably not as complex as it seems, but i am stuck at this point trying to find a solution to this :( I am attaching a sample project with this mail for your reference. Any help would be greatly appreciated. Thanks in advance, Vikram -- Lotusphere 2011 Register now for Lotusphere 2011 and learn how to connect the dots, take your collaborative environment to the next level, and enter the era of Social Business. http://p.sf.net/sfu/lotusphere-d2d ___ Gambas-user mailing list Gambas-user@lists.sourceforge.net https://lists.sourceforge.net/lists/listinfo/gambas-user -- Fabien Bodard -- Lotusphere 2011 Register now for Lotusphere 2011 and learn how to connect the dots, take your collaborative environment to the next level, and enter the era of Social Business. http://p.sf.net/sfu/lotusphere-d2d ___ Gambas-user mailing list Gambas-user@lists.sourceforge.net https://lists.sourceforge.net/lists/listinfo/gambas-user -- Fabien Bodard -- Lotusphere 2011 Register now for Lotusphere 2011 and learn how to connect the dots, take your collaborative environment to the next level, and enter the era of Social Business. http://p.sf.net/sfu/lotusphere-d2d ___ Gambas-user mailing list Gambas-user@lists.sourceforge.net https://lists.sourceforge.net/lists/listinfo/gambas-user
Re: [Gambas-user] IsFloat
I think it's right, because an integer isn't a float. Maybe you're thinking in other function like CanBeConvertedToFloat() (doesn't exist in gambas but it's on my own functions set). Regards, Ricardo Díaz I think Jussi is right there. After all, an Integer or a Long can always be converted to a Float. So I will modify IsFloat() accordingly, and it will becoming a synonymous of IsNumber(). Regards, -- Benoît Minisini -- Lotusphere 2011 Register now for Lotusphere 2011 and learn how to connect the dots, take your collaborative environment to the next level, and enter the era of Social Business. http://p.sf.net/sfu/lotusphere-d2d ___ Gambas-user mailing list Gambas-user@lists.sourceforge.net https://lists.sourceforge.net/lists/listinfo/gambas-user
[Gambas-user] Control.Proxy property (was Re: Gambas 3 advancement)
I'm currently implementing a Proxy class that allows to automatically delegate events from one object to another one. But the result is not beautiful. I must think about all that... I finally dropped my Proxy class, finding no way to implement it correctly. Instead, I created a Proxy property in the Control class. When a control has a proxy, it will raise all mouse and keyboard events of its proxy for itself (the proxy keeps its own events). Moreover, SetFocus() and HasFocus() on the control will actually act on the proxy. For example, in the ValueBox user control, the inner TextBox is set as its proxy. That way, all keyboard events of the TextBox are catched as if the ValueBox has raised them. -- Benoît Minisini -- Lotusphere 2011 Register now for Lotusphere 2011 and learn how to connect the dots, take your collaborative environment to the next level, and enter the era of Social Business. http://p.sf.net/sfu/lotusphere-d2d ___ Gambas-user mailing list Gambas-user@lists.sourceforge.net https://lists.sourceforge.net/lists/listinfo/gambas-user
[Gambas-user] Making a web app
Hi folks, Just had the idea to implement a small application to be called via a browser (it is to show the user a collection of pdf files, some choices to choose from etc.). How could I do this in Gambas, or better: where do I start? I've done command line applications in Gambas before, but how do I feed apache with it? Just give me a few hints where and how to start, only general things... Thanks! Rolf -- Lotusphere 2011 Register now for Lotusphere 2011 and learn how to connect the dots, take your collaborative environment to the next level, and enter the era of Social Business. http://p.sf.net/sfu/lotusphere-d2d ___ Gambas-user mailing list Gambas-user@lists.sourceforge.net https://lists.sourceforge.net/lists/listinfo/gambas-user
Re: [Gambas-user] Making a web app
Am 21.12.2010 15:41, schrieb Rolf-Werner Eilert: Hi folks, Just had the idea to implement a small application to be called via a browser (it is to show the user a collection of pdf files, some choices to choose from etc.). How could I do this in Gambas, or better: where do I start? I've done command line applications in Gambas before, but how do I feed apache with it? Just give me a few hints where and how to start, only general things... Thanks! Rolf Now, to make things somewhat clearer, let me add this: During the last two hours or so I set up a commandline application in Gambas doing this: PUBLIC SUB Main() PRINT !DOCTYPE HTML PUBLIC \-//W3C//DTD HTML 4.01 Transitional//EN\ PRINT html PRINT head PRINT title Testseite /title PRINT /head PRINT body bgcolor=\#E0E0E0\ PRINT h1Testeingabe/h1 PRINT /body PRINT /html END Made an executable from it and placed it in cgi-bin. In htdocs I produced a small html file which is intended to call it. I tried several ways of calling it, but I always get the same server error saying Premature end of script headers: (and the name of the executable) So what does it mean? Regards Rolf -- Forrester recently released a report on the Return on Investment (ROI) of Google Apps. They found a 300% ROI, 38%-56% cost savings, and break-even within 7 months. Over 3 million businesses have gone Google with Google Apps: an online email calendar, and document program that's accessible from your browser. Read the Forrester report: http://p.sf.net/sfu/googleapps-sfnew ___ Gambas-user mailing list Gambas-user@lists.sourceforge.net https://lists.sourceforge.net/lists/listinfo/gambas-user
Re: [Gambas-user] Making a web app
Sorry for bothering you with this, I guess it all boils down to this error I found in the apache error log: /usr/bin/env cannot find gbr2: /usr/bin/env: gbr2: no such file or directory The script can be started from the command line, however. Strange thing... Regards Rolf -- Forrester recently released a report on the Return on Investment (ROI) of Google Apps. They found a 300% ROI, 38%-56% cost savings, and break-even within 7 months. Over 3 million businesses have gone Google with Google Apps: an online email calendar, and document program that's accessible from your browser. Read the Forrester report: http://p.sf.net/sfu/googleapps-sfnew ___ Gambas-user mailing list Gambas-user@lists.sourceforge.net https://lists.sourceforge.net/lists/listinfo/gambas-user
Re: [Gambas-user] IsFloat
I was wondering if some (definitely not all!) of IsXXX functions should have different names, example SafeForXXX or similar? That would describe their new functionality better. Example, IsNull really tells if value Is Null or not (so IsNull is good name), but IsFloat tells only if value is safe to interpret as float. So it doesn't really say if value *Is Float* or not. What do you think? Jussi 2010/12/21 Benoît Minisini gam...@users.sourceforge.net I think it's right, because an integer isn't a float. Maybe you're thinking in other function like CanBeConvertedToFloat() (doesn't exist in gambas but it's on my own functions set). Regards, Ricardo Díaz I think Jussi is right there. After all, an Integer or a Long can always be converted to a Float. So I will modify IsFloat() accordingly, and it will becoming a synonymous of IsNumber(). Regards, -- Benoît Minisini -- Lotusphere 2011 Register now for Lotusphere 2011 and learn how to connect the dots, take your collaborative environment to the next level, and enter the era of Social Business. http://p.sf.net/sfu/lotusphere-d2d ___ Gambas-user mailing list Gambas-user@lists.sourceforge.net https://lists.sourceforge.net/lists/listinfo/gambas-user -- Forrester recently released a report on the Return on Investment (ROI) of Google Apps. They found a 300% ROI, 38%-56% cost savings, and break-even within 7 months. Over 3 million businesses have gone Google with Google Apps: an online email calendar, and document program that's accessible from your browser. Read the Forrester report: http://p.sf.net/sfu/googleapps-sfnew ___ Gambas-user mailing list Gambas-user@lists.sourceforge.net https://lists.sourceforge.net/lists/listinfo/gambas-user
Re: [Gambas-user] Making a web app
Hi Rolf-Werner Now, to make things somewhat clearer, let me add this: During the last two hours or so I set up a commandline application in Gambas doing this: PUBLIC SUB Main() PRINT !DOCTYPE HTML PUBLIC \-//W3C//DTD HTML 4.01 Transitional//EN\ Here you have to print an empty line - its part of the HTML-Standard! PRINT html PRINT head PRINT title Testseite /title PRINT /head PRINT body bgcolor=\#E0E0E0\ PRINT h1Testeingabe/h1 PRINT /body PRINT /html END Premature end of script headers: (and the name of the executable) Error comes form bad formated HTM-Output. Gruß Rolf signature.asc Description: This is a digitally signed message part. -- Forrester recently released a report on the Return on Investment (ROI) of Google Apps. They found a 300% ROI, 38%-56% cost savings, and break-even within 7 months. Over 3 million businesses have gone Google with Google Apps: an online email calendar, and document program that's accessible from your browser. Read the Forrester report: http://p.sf.net/sfu/googleapps-sfnew___ Gambas-user mailing list Gambas-user@lists.sourceforge.net https://lists.sourceforge.net/lists/listinfo/gambas-user
Re: [Gambas-user] Making a web app
Sorry for bothering you with this, I guess it all boils down to this error I found in the apache error log: /usr/bin/env cannot find gbr2: /usr/bin/env: gbr2: no such file or directory The script can be started from the command line, however. Strange thing... Regards Rolf The PATH of the user used by Apache is not the same as yours, and so /usr/bin/env cannot find gbr2 when run by Apache. I guess that gbr2 is installed in /usr/local/bin on your system. If it is the case, install it in /usr/bin. If it is not the case, i.e. if gbr2 is already in /usr/bin, then I don't understand what happens. Regards, -- Benoît Minisini -- Forrester recently released a report on the Return on Investment (ROI) of Google Apps. They found a 300% ROI, 38%-56% cost savings, and break-even within 7 months. Over 3 million businesses have gone Google with Google Apps: an online email calendar, and document program that's accessible from your browser. Read the Forrester report: http://p.sf.net/sfu/googleapps-sfnew ___ Gambas-user mailing list Gambas-user@lists.sourceforge.net https://lists.sourceforge.net/lists/listinfo/gambas-user
Re: [Gambas-user] IsFloat
Also that would prevent mix up with IsXXX functions when moving from Gambas 2 to 3. Jussi On Tue, Dec 21, 2010 at 19:18, Jussi Lahtinen jussi.lahti...@gmail.comwrote: I was wondering if some (definitely not all!) of IsXXX functions should have different names, example SafeForXXX or similar? That would describe their new functionality better. Example, IsNull really tells if value Is Null or not (so IsNull is good name), but IsFloat tells only if value is safe to interpret as float. So it doesn't really say if value *Is Float* or not. What do you think? Jussi 2010/12/21 Benoît Minisini gam...@users.sourceforge.net I think it's right, because an integer isn't a float. Maybe you're thinking in other function like CanBeConvertedToFloat() (doesn't exist in gambas but it's on my own functions set). Regards, Ricardo Díaz I think Jussi is right there. After all, an Integer or a Long can always be converted to a Float. So I will modify IsFloat() accordingly, and it will becoming a synonymous of IsNumber(). Regards, -- Benoît Minisini -- Lotusphere 2011 Register now for Lotusphere 2011 and learn how to connect the dots, take your collaborative environment to the next level, and enter the era of Social Business. http://p.sf.net/sfu/lotusphere-d2d ___ Gambas-user mailing list Gambas-user@lists.sourceforge.net https://lists.sourceforge.net/lists/listinfo/gambas-user -- Forrester recently released a report on the Return on Investment (ROI) of Google Apps. They found a 300% ROI, 38%-56% cost savings, and break-even within 7 months. Over 3 million businesses have gone Google with Google Apps: an online email calendar, and document program that's accessible from your browser. Read the Forrester report: http://p.sf.net/sfu/googleapps-sfnew ___ Gambas-user mailing list Gambas-user@lists.sourceforge.net https://lists.sourceforge.net/lists/listinfo/gambas-user
Re: [Gambas-user] Making a web app
or just make link fro /usr/local/bin/gbr2 to /usr/bin Le 21 décembre 2010 18:23, Benoît Minisini gam...@users.sourceforge.net a écrit : Sorry for bothering you with this, I guess it all boils down to this error I found in the apache error log: /usr/bin/env cannot find gbr2: /usr/bin/env: gbr2: no such file or directory The script can be started from the command line, however. Strange thing... Regards Rolf The PATH of the user used by Apache is not the same as yours, and so /usr/bin/env cannot find gbr2 when run by Apache. I guess that gbr2 is installed in /usr/local/bin on your system. If it is the case, install it in /usr/bin. If it is not the case, i.e. if gbr2 is already in /usr/bin, then I don't understand what happens. Regards, -- Benoît Minisini -- Forrester recently released a report on the Return on Investment (ROI) of Google Apps. They found a 300% ROI, 38%-56% cost savings, and break-even within 7 months. Over 3 million businesses have gone Google with Google Apps: an online email calendar, and document program that's accessible from your browser. Read the Forrester report: http://p.sf.net/sfu/googleapps-sfnew ___ Gambas-user mailing list Gambas-user@lists.sourceforge.net https://lists.sourceforge.net/lists/listinfo/gambas-user -- Fabien Bodard -- Forrester recently released a report on the Return on Investment (ROI) of Google Apps. They found a 300% ROI, 38%-56% cost savings, and break-even within 7 months. Over 3 million businesses have gone Google with Google Apps: an online email calendar, and document program that's accessible from your browser. Read the Forrester report: http://p.sf.net/sfu/googleapps-sfnew ___ Gambas-user mailing list Gambas-user@lists.sourceforge.net https://lists.sourceforge.net/lists/listinfo/gambas-user
Re: [Gambas-user] Gambas 3 advancement
Benoît Minisini ha scritto: Benoît Minisini ha scritto: Pipes should not return EOF when the pipe is not closed. But they should return EOF when the other side closes. Why ? Because this is the way *all* unix routines work, and the only logical one. You get a point, but Eof() in Gambas does not actually mean what EOF means in Unix. I had only one Basic syntax for that, and I need to know if there is something to read on a stream, and I used Eof() for that. For a file stream, the two meanings are the same. But not for a pipe or a socket. At the moment, for a pipe or a socket, you get an error when it is closed. Note that for a socket, there is date to read does not mean the same thing than for a pipe, because there is the network between two sides of a socket. (Readed the following mail too...) What do you mean? I will try to change the meaning of Eof() to match the Unix one, and see how many things break. And I will keep the meaning of Lof(), so that Lof() = 0 means that there is nothing to read, even if the new Eof() is False. The solution seems perfect. In the old days of basic, lof() was used on serial lines to see if there were data to read. Regards, Doriano -- Forrester recently released a report on the Return on Investment (ROI) of Google Apps. They found a 300% ROI, 38%-56% cost savings, and break-even within 7 months. Over 3 million businesses have gone Google with Google Apps: an online email calendar, and document program that's accessible from your browser. Read the Forrester report: http://p.sf.net/sfu/googleapps-sfnew ___ Gambas-user mailing list Gambas-user@lists.sourceforge.net https://lists.sourceforge.net/lists/listinfo/gambas-user
Re: [Gambas-user] Did anyone have a script to record webcame picture in video files
i'm sorry,, i've problem with my gambas3, i tried to install it in ubuntu 10.10 and any problem there. When i openned gambas3 there was nothing menus.. but the project can openned. So i use os windows for put the source archive using winrar.. and here's the archive.. so u can extract the rar file first, and open it in gambas3. i'm wating for ur solutions for my project. thanks. http://old.nabble.com/file/p30510255/TACAMCCTVrev2.rar TACAMCCTVrev2.rar Jussi Lahtinen wrote: Project -- Make -- Source archive And put the script in that tar ball also. Jussi On Mon, Dec 20, 2010 at 08:32, firman firman@gmail.com wrote: okay i'll send u entire project, but which one do u need, Files project in package program or just All script in main form?? thank's Jussi Lahtinen wrote: It is easier to help if you send your whole project. I can't see any handling for CatProcess. Jussi On Sat, Dec 18, 2010 at 02:11, firman firman@gmail.com wrote: I Almost done my project about monitoring camera using webcam with gambas 3... the picture or streaming video can displayed on picturebox but i still have a problem to record in video file mode r like avi, mpg or other compressed format.. please help me if anyone can solve my problem. i will showing u a picture of FMain my project... the record button still couldn't worked... i'm using gambas 3 svn... I've wrote the script like this, and worked the files created but still 0 KB or nothing recorded this is the script: 'Proses Menyimpan File record Public Sub InitCapture() If Not CatProcess Then bytesrecorded = 0 CatProcess = Exec [cat, /dev/video0] For Read CatProcess = Exec [cat, /dev/video1] For Read CatProcess = Exec [cat, /dev/video2] For Read CatProcess = Exec [cat, /dev/video3] For Read Endif UpdateBytesLabel() End Public Sub Process_Write(data As String) If pic1.Picture = $cam1.Image.Picture Then If pic2.Picture = $cam2.Image.Picture Then If pic3.Picture = $cam3.Image.Picture Then If pic4.Picture = $cam4.Image.Picture Then Return Endif Endif Endif Endif Try pic1.Picture.send(data) Try pic2.Picture.send(data) Try pic3.Picture.send(data) Try pic4.Picture.send(data) Try saveprocess.send(data) bytesrecorded = bytesrecorded + Len(data) End Public Sub btnRecord_Click() If btnRecord.text = Record Then bytesrecorded = 0 starttime = Now endtime = starttime initcapture() Tmr1_Timer() btnRecord.text = Stop SaveProcess = Exec [bash, -c, catsetFilename1()] For Write SaveProcess = Exec [bash, -c, catsetFilename2()] For Write SaveProcess = Exec [bash, -c, catsetFilename3()] For Write SaveProcess = Exec [bash, -c, catsetFilename4()] For Write Else endtime = Now Try saveprocess.kill btnRecord.text = Record setFilename1() setFilename2() setFilename3() setFilename4() Endif End Public Function setFilename1() As String Dim i As Integer i = 0 'Do While Exist(Application.Path / kamera1 i .mpg) Do While Exist(User.Home / kamera1 i .mpg) i = i + 1 Loop 'Return Application.Path / kamera1 Format(i, 000) .mpg Return User.Home / kamera1 Format(i, 000) .mpg End Public Function setFilename2() As String Dim i As Integer i = 0 Do While Exist(User.Home / kamera2 i .mpg) i = i + 1 Loop Return User.Home / kamera2 Format(i, 000) .mpg End Public Function setFilename3() As String Dim i As Integer i = 0 Do While Exist(User.Home / kamera3 i .mpg) i = i + 1 Loop Return User.Home / kamera3 Format(i, 000) .mpg End Public Function setFilename4() As String Dim i As Integer i = 0 Do While Exist(User.Home / kamera4 i .mpg) i = i + 1 Loop Return User.Home / kamera4 Format(i, 000) .mpg End Public Sub UpdateBytesLabel() Dim i As Float If bytesrecorded 1048576 Then i = Int(bytesrecorded / 10) Else i = Int(bytesrecorded / 100) Endif End Public Sub UpdateTimeLabel() If starttime = 00:00:00 Then Return If endtime starttime Then Return TextDate1.text = Time(CDate(CInt(Now) + (Now - starttime) + timezoneadjust)) End anyone can solve my problem please...? -- View this message in context: http://old.nabble.com/Did-anyone-have-a-script-to-record-webcame-picture-in-video-files-tp30442622p30442622.html Sent from the gambas-user mailing list archive at Nabble.com. -- Lotusphere 2011 Register now for Lotusphere 2011 and learn how to connect the dots, take your collaborative environment to the next level, and enter the era of Social Business. http://p.sf.net/sfu/lotusphere-d2d
Re: [Gambas-user] CDE. An interesting packaging tool
IS there any movement on the Gambas3 packaging suite to compile and/or include the runtime and libs for the various distributions? I also looked at the CDE route and exceptions can be made to keep files to a minimum and just run your app with cde gbr3 project.gambas I got minimal results though because while CDE works, it's kind of a pain when I want to interact with system files and such outside the cde-root. Benoit... any idea on how life will be in Gambas 3 for packaging runtime/libs? I know I am not the only one begging for this :D Thanks for your time. Nick On Sun, Nov 14, 2010 at 8:23 AM, Demosthenes Koptsis demosthen...@gmail.com wrote: yes this is better. i tried cde with gambas project and it copied all the files in cde-package included passwd /home directory and other files that application used. This feature should work only for libs and as an option for packagers not an only way method. This is my opinion. On Sun, 2010-11-14 at 12:43 +0100, Benoît Minisini wrote: Although I'm not a gambas developer, I appreciate the idea. I would prefer to have all the must-haves packaged into single file, instead of fighting with unresolved package dependencies. It's better to have a myprogram.bin installer, than myprogram.rpm, myprogram.deb... Maybe Benoit would argue because of the package size. It's more like Windows. But who cares. If I'd be sure my program will run independently of the Linux platform flavor, I'd yes to size increment. Csaba This is exactly what Cristian Abarzua F. (craf) tried to achieve. But it did it by hand, I tried to help him, but we encountered problems. Apparently 'cde' seems to work, so I should try it and integrate it inside the IDE packager. So, no I'm not fully against that kind of package now. Except that users should be aware of the following: - They will be bigger (imagine a full Gambas GUI program relying of a lot of components). - System security fix and updates won't apply to them. So packagers must regularly repackage them. (Same nightmare as in windows). Regards, Another possible problem: Gambas can load a component during the execution of a program (Component.Load() method), not necesarilly at startup. So you must take that into account when making a cde package! Moreover, some component uses that feature. For example, the Gambas 3 gb.form.stock hidden component included a full stock of icons that is loaded only if an icon is not found in the Gnome or KDE icon themes installed on the system (which is very possible if you didn't install both Gnome and KDE). Regards, Another problem again: cde will store in the packages *all* existing files opened by the program during its execution. Maybe I should take the source code of 'cde' and modify it to only store the shared libraries? -- Centralized Desktop Delivery: Dell and VMware Reference Architecture Simplifying enterprise desktop deployment and management using Dell EqualLogic storage and VMware View: A highly scalable, end-to-end client virtualization framework. Read more! http://p.sf.net/sfu/dell-eql-dev2dev ___ Gambas-user mailing list Gambas-user@lists.sourceforge.net https://lists.sourceforge.net/lists/listinfo/gambas-user -- Forrester recently released a report on the Return on Investment (ROI) of Google Apps. They found a 300% ROI, 38%-56% cost savings, and break-even within 7 months. Over 3 million businesses have gone Google with Google Apps: an online email calendar, and document program that's accessible from your browser. Read the Forrester report: http://p.sf.net/sfu/googleapps-sfnew ___ Gambas-user mailing list Gambas-user@lists.sourceforge.net https://lists.sourceforge.net/lists/listinfo/gambas-user
Re: [Gambas-user] Did anyone have a script to record webcame picture in video files
ctrl+alt+m... to show the menu ? 2010/12/21 firman firman@gmail.com: i'm sorry,, i've problem with my gambas3, i tried to install it in ubuntu 10.10 and any problem there. When i openned gambas3 there was nothing menus.. but the project can openned. So i use os windows for put the source archive using winrar.. and here's the archive.. so u can extract the rar file first, and open it in gambas3. i'm wating for ur solutions for my project. thanks. http://old.nabble.com/file/p30510255/TACAMCCTVrev2.rar TACAMCCTVrev2.rar Jussi Lahtinen wrote: Project -- Make -- Source archive And put the script in that tar ball also. Jussi On Mon, Dec 20, 2010 at 08:32, firman firman@gmail.com wrote: okay i'll send u entire project, but which one do u need, Files project in package program or just All script in main form?? thank's Jussi Lahtinen wrote: It is easier to help if you send your whole project. I can't see any handling for CatProcess. Jussi On Sat, Dec 18, 2010 at 02:11, firman firman@gmail.com wrote: I Almost done my project about monitoring camera using webcam with gambas 3... the picture or streaming video can displayed on picturebox but i still have a problem to record in video file mode r like avi, mpg or other compressed format.. please help me if anyone can solve my problem. i will showing u a picture of FMain my project... the record button still couldn't worked... i'm using gambas 3 svn... I've wrote the script like this, and worked the files created but still 0 KB or nothing recorded this is the script: 'Proses Menyimpan File record Public Sub InitCapture() If Not CatProcess Then bytesrecorded = 0 CatProcess = Exec [cat, /dev/video0] For Read CatProcess = Exec [cat, /dev/video1] For Read CatProcess = Exec [cat, /dev/video2] For Read CatProcess = Exec [cat, /dev/video3] For Read Endif UpdateBytesLabel() End Public Sub Process_Write(data As String) If pic1.Picture = $cam1.Image.Picture Then If pic2.Picture = $cam2.Image.Picture Then If pic3.Picture = $cam3.Image.Picture Then If pic4.Picture = $cam4.Image.Picture Then Return Endif Endif Endif Endif Try pic1.Picture.send(data) Try pic2.Picture.send(data) Try pic3.Picture.send(data) Try pic4.Picture.send(data) Try saveprocess.send(data) bytesrecorded = bytesrecorded + Len(data) End Public Sub btnRecord_Click() If btnRecord.text = Record Then bytesrecorded = 0 starttime = Now endtime = starttime initcapture() Tmr1_Timer() btnRecord.text = Stop SaveProcess = Exec [bash, -c, catsetFilename1()] For Write SaveProcess = Exec [bash, -c, catsetFilename2()] For Write SaveProcess = Exec [bash, -c, catsetFilename3()] For Write SaveProcess = Exec [bash, -c, catsetFilename4()] For Write Else endtime = Now Try saveprocess.kill btnRecord.text = Record setFilename1() setFilename2() setFilename3() setFilename4() Endif End Public Function setFilename1() As String Dim i As Integer i = 0 'Do While Exist(Application.Path / kamera1 i .mpg) Do While Exist(User.Home / kamera1 i .mpg) i = i + 1 Loop 'Return Application.Path / kamera1 Format(i, 000) .mpg Return User.Home / kamera1 Format(i, 000) .mpg End Public Function setFilename2() As String Dim i As Integer i = 0 Do While Exist(User.Home / kamera2 i .mpg) i = i + 1 Loop Return User.Home / kamera2 Format(i, 000) .mpg End Public Function setFilename3() As String Dim i As Integer i = 0 Do While Exist(User.Home / kamera3 i .mpg) i = i + 1 Loop Return User.Home / kamera3 Format(i, 000) .mpg End Public Function setFilename4() As String Dim i As Integer i = 0 Do While Exist(User.Home / kamera4 i .mpg) i = i + 1 Loop Return User.Home / kamera4 Format(i, 000) .mpg End Public Sub UpdateBytesLabel() Dim i As Float If bytesrecorded 1048576 Then i = Int(bytesrecorded / 10) Else i = Int(bytesrecorded / 100) Endif End Public Sub UpdateTimeLabel() If starttime = 00:00:00 Then Return If endtime starttime Then Return TextDate1.text = Time(CDate(CInt(Now) + (Now - starttime) + timezoneadjust)) End anyone can solve my problem please...? -- View this message in context: http://old.nabble.com/Did-anyone-have-a-script-to-record-webcame-picture-in-video-files-tp30442622p30442622.html Sent from the gambas-user mailing list archive at Nabble.com. -- Lotusphere 2011 Register now for Lotusphere 2011 and learn how to connect the dots, take your collaborative environment to the next level, and
