[nsbasic-ce] Re: sqlite data into grid update

2010-10-25 Thread inpcle

By George, I got it! ;o)

Spend hours and hours, but I found the solution.

Here the code:

Sub prodknop_click

   For col=1 To records3.count
GridCtrl1.Col = 1
'If GridCtrl1.col = 1 Then
GridCtrl1.addItem records3 (col)(12)  vbTab  records3 (col)(11)
Next
End Sub


By putting   vbTab  between the records that I want to display it is now 
seperated in de col.

Tought I share the solution ;o)

With kind regards,

Charles

--- In nsbasic-ce@yahoogroups.com, inpcle inp...@... wrote:

 Hi everybody,
 
 I am working on a program and I want to put records in to a grid.
 With 1 column that is no problem, but when I want to have more then 1 column  
 to put it in the grid, that is a problem for me...
 
 Greetings,
 
 Charles



-- 
You received this message because you are subscribed to the Google Groups 
nsb-ce group.
To post to this group, send email to nsb...@googlegroups.com.
To unsubscribe from this group, send email to 
nsb-ce+unsubscr...@googlegroups.com.
For more options, visit this group at 
http://groups.google.com/group/nsb-ce?hl=en.



[nsbasic-ce] Re: qsketch how to?

2010-10-23 Thread inpcle
Hi Thomas,

Thanks for the information, but that too I have tried and did not worked.

The thing is that it does not use the inputs for the picturebox.
I solved it by adding picturebox in the form, renamed some lines and it works 
now.

Like you can see I replaced outpic with NSCEPictureBox1 and that did the trick.

With kind regards,

Charles

Sub NSCEPictureBox1_mousedown(button, shift, x, y)
  NSCEPictureBox1.drawpoint x,y
  tmpxy=x  #  y
  xp=x
  yp=y
End Sub

Sub NSCEPictureBox1_mouseup(button, shift, x, y)
  If dkline Then
dy=Abs(yp-y)
dx=Abs(xp-x)
If dxdy Then y=yp Else x=xp
  End If
  NSCEPictureBox1.drawline xp,yp,x,y
  tmpxy=tmpxy  #  x  #  y
  sezn(pocet)=tmpxy
  tmpxy=
  Rem MsgBox (sezn(pocet))
  pocet=pocet+1
End Sub

Sub NSCEPictureBox1_mousemove(button, shift, x, y)
 If Dfree Then
NSCEPictureBox1.drawline xp,yp,x,y
tmpxy=tmpxy  #  x  #  y
xp=x
yp=y
  End If
End Sub


Sub f1h_click
form1g_hide
form1h_show
  NSCEPictureBox1.fillcolor=H00FF
  NSCEPictureBox1.BackColor=H00FF
  NSCEPictureBox1.Appearance=2
  NSCEPictureBox1.borderstyle=1
  NSCEPictureBox1.scalemode=3
  NSCEPictureBox1.drawwidth=2
  NSCEPictureBox1.width=200
  NSCEPictureBox1.height=100

 Dfree=True
 Dline=False
 Dkline=False

End Sub

--- In nsbasic-ce@yahoogroups.com, Thomas Gruber computerhu...@... wrote:

 Hi Charles,
 the form_load routine must have the name of your form (e.g. form1h) 
 followed by _load.
 So if your form is called form1, it must be named
 
 Sub form1h_load
 ...
 
 That way, it will run when your form is loaded (made visible), which happens 
 when you execute the statement
 
 form1h_show
 
 
 
 Kind regards
 Thomas
 
 
 Am 22.10.2010 um 17:14PM schrieb inpcle:
 
  
  Hi,
  
  I want to intergrade Qsketch in my form.
  
  I tried to replace load_form with form1h_load
  but that did not worked.
  If I hide the last form that I am in it, then I see like the example in NS 
  basic the box and I can draw lines.
  
  How can I make it work in my form when I load the form (form1h_show)?
  
  With kind regards,
  
  Charles
  
  Sub load_form
  Dfree=True
  Dline=False
  Dkline=False
  Dim titlebar
  titlebar=Array(About)
  SetMenu titlebar,titlebar
  
  AddObject picturebox,outpic,20,120,180,100
  outpic.borderstyle=1
  outpic.scalemode=3
  outpic.drawwidth=2
  outpic.width=200
  outpic.height=100
  
  End Sub
  
  Sub outpic_mousedown(button, shift, x, y)
  outpic.drawpoint x,y
  tmpxy=x  #  y
  xp=x
  yp=y
  End Sub
  
  Sub outpic_mouseup(button, shift, x, y)
  If dkline Then
  dy=Abs(yp-y)
  dx=Abs(xp-x)
  If dxdy Then y=yp Else x=xp
  End If
  outpic.drawline xp,yp,x,y
  tmpxy=tmpxy  #  x  #  y
  sezn(pocet)=tmpxy
  tmpxy=
  Rem MsgBox (sezn(pocet))
  pocet=pocet+1
  End Sub
  
  Sub outpic_mousemove(button, shift, x, y)
  If Dfree Then
  outpic.drawline xp,yp,x,y
  tmpxy=tmpxy  #  x  #  y
  xp=x
  yp=y
  End If
  End Sub
  
  Sub btnk_click
  Bye
  End Sub
  
  Sub about_click
  MsgBox(Quick sketch  vbCrLf NS Basic/CE  vbCrLf  www.nsbasic.com 
   vbCrLf  PDA technology  vbCrLf  www.pda.cz)
  End Sub
  
 



-- 
You received this message because you are subscribed to the Google Groups 
nsb-ce group.
To post to this group, send email to nsb...@googlegroups.com.
To unsubscribe from this group, send email to 
nsb-ce+unsubscr...@googlegroups.com.
For more options, visit this group at 
http://groups.google.com/group/nsb-ce?hl=en.



[nsbasic-ce] Re: picturebox

2010-10-23 Thread inpcle
I tried this:
Sub save2_click
   NSCEPictureBox1.SaveImageToFile signature,0
   
End Sub

But nothing seems to happen...

--- In nsbasic-ce@yahoogroups.com, Andrew Thomas andrewmarktho...@... wrote:

 Hi. It's true, I've been lucky to get help with many problems because so many 
 diverse people belong to this group :)  But sorry Charles, I've never used 
 the grid element :(
 
 Best wishes,
 
 Andrew.
 
 
 
 -Original Message-
 From: George Henne g...@...
 Sent: 19 October 2010 15:47
 To: nsbasic-ce@yahoogroups.com nsbasic-ce@yahoogroups.com
 Subject: Re: [nsbasic-ce] Re: picturebox
 
 Don't take it personally if I don't answer a question. It probably means
 I think there is an answer, but I don't know what it is. Many times,
 someone else does know the answer.
 
 Gehehehe,
 
 oke thanks Andrew, I am going to look at is tonight.
 
 PS
 
 
 [The entire original message is not included]



-- 
You received this message because you are subscribed to the Google Groups 
nsb-ce group.
To post to this group, send email to nsb...@googlegroups.com.
To unsubscribe from this group, send email to 
nsb-ce+unsubscr...@googlegroups.com.
For more options, visit this group at 
http://groups.google.com/group/nsb-ce?hl=en.



[nsbasic-ce] Re: picturebox

2010-10-23 Thread inpcle
ow men... thanks!

That should do the trick! 
Thanks TsTan!

--- In nsbasic-ce@yahoogroups.com, tan tst...@... wrote:

 hi,
 you could try this, i've tested the code
  
 'remember to load NSCEPictureBox1 and CommandButton1 
 Sub Form1_Load
 Dim fname
 fname = CurrentPath  \place_yr_pic_here.bmp
 NSCEPictureBox1.DrawPicture fname,1,1,600,600,300,300,800,800
 End Sub
 Sub CommandButton1_Click
 Dim filename_
 filename1 = C:\mypic.bmp
 NSCEPictureBox1.SaveImageToFile filename1,0 
 Dim kp
 kp = filename1   saved successfully ! 
 MsgBox kp,vbInformation,bitmap saved!
 End Sub
 
 rdgs,TsTan
 --- In nsbasic-ce@yahoogroups.com, inpcle inpcle@ wrote:
 
  I tried this:
  Sub save2_click
 NSCEPictureBox1.SaveImageToFile signature,0
 
  End Sub
  
  But nothing seems to happen...
  
  --- In nsbasic-ce@yahoogroups.com, Andrew Thomas andrewmarkthomas@ wrote:
  
   Hi. It's true, I've been lucky to get help with many problems because so 
   many diverse people belong to this group :)  But sorry Charles, I've 
   never used the grid element :(
   
   Best wishes,
   
   Andrew.
   
   
   
   -Original Message-
   From: George Henne gh@
   Sent: 19 October 2010 15:47
   To: nsbasic-ce@yahoogroups.com nsbasic-ce@yahoogroups.com
   Subject: Re: [nsbasic-ce] Re: picturebox
   
   Don't take it personally if I don't answer a question. It probably means
   I think there is an answer, but I don't know what it is. Many times,
   someone else does know the answer.
   
   Gehehehe,
   
   oke thanks Andrew, I am going to look at is tonight.
   
   PS
   
   
   [The entire original message is not included]
  
 



-- 
You received this message because you are subscribed to the Google Groups 
nsb-ce group.
To post to this group, send email to nsb...@googlegroups.com.
To unsubscribe from this group, send email to 
nsb-ce+unsubscr...@googlegroups.com.
For more options, visit this group at 
http://groups.google.com/group/nsb-ce?hl=en.



[nsbasic-ce] Re: picturebox

2010-10-17 Thread inpcle
I did George, but you can also draw with it (see picturebox sample) but I want 
to save it to a .jpg or .bmp and add it to the database or get a value (name) 
from the database and save it. In the technote I dont read anything about 
saving it.

What would be the correct syntax for that? 



--- In nsbasic-ce@yahoogroups.com, George Henne g...@... wrote:

 Have a look at the PictureBox sample - it displays a picture.
 
 Many people use the S309PictureBox instead. It is much more flexible in
 the kinds of images it can display.
 
 I have one simple question that I knwo you have an answer for. I'm 
 developing a program that uses a number of .bmp files. what is the 
 correct procedure for getting them to work with nsbasic ce 5? Can you 
 tell the correct syntax or program lines I need to accomplish this. 
 
 thanks
 
 
 
 
 
  
 Yahoo! Groups Links
 
 
 
  
 



-- 
You received this message because you are subscribed to the Google Groups 
nsb-ce group.
To post to this group, send email to nsb...@googlegroups.com.
To unsubscribe from this group, send email to 
nsb-ce+unsubscr...@googlegroups.com.
For more options, visit this group at 
http://groups.google.com/group/nsb-ce?hl=en.



[nsbasic-ce] Re: picturebox

2010-10-17 Thread inpcle
Yes I do Andrew,

Thanks for your help!

With kind regards,

Charles

--- In nsbasic-ce@yahoogroups.com, Andrew Thomas andrewmarktho...@... wrote:

 Hi,
 
 Assuming you're using the NSB picturebox control, the format is simply:
 
 picturebox.saveimagetofile filename,0
 
 Best wishes,
 
 Andrew.
 
 
 
 -Original Message-
 From: inpcle inp...@...
 Sent: 17 October 2010 20:53
 To: nsbasic-ce@yahoogroups.com
 Subject: [nsbasic-ce] Re: picturebox
 
 I did George, but you can also draw with it (see picturebox sample) but I 
 want to save it to a .jpg or .bmp and add it to the database or get a value 
 (name) from the database and save it. In the technote I dont read anything 
 about saving it.
 
 What would be the correct syntax for that? 
 
 
 
 --- In nsbasic-ce@yahoogroups.com, George Henne gh@ wrote:
 
  Have a look at the PictureBox sample - it displays a picture.
  
  Many people use the S309PictureBox instead. It is much more flexible in
  the kinds of images it can display.
  
  I have one simple question that I knwo you have an answer for. I'm 
  developing a program that uses a number of .bmp files. what is the 
  correct procedure for getting them to work with nsbasic ce 5? Can you 
  tell the correct syntax or program lines I need to accomplish this. 
  
  thanks
  
  
  
  
  
   
  Yahoo! Groups Links
  
  
  
   
  
 



-- 
You received this message because you are subscribed to the Google Groups 
nsb-ce group.
To post to this group, send email to nsb...@googlegroups.com.
To unsubscribe from this group, send email to 
nsb-ce+unsubscr...@googlegroups.com.
For more options, visit this group at 
http://groups.google.com/group/nsb-ce?hl=en.



[nsbasic-ce] sqlite data into grid

2010-10-14 Thread inpcle
Hi everybody,

I am working on a program and I want to put records in to a grid.
With 1 column that is no problem, but when I want to have more then 1 column  
to put it in the grid, that is a problem for me...

Greetings,

Charles




-- 
You received this message because you are subscribed to the Google Groups 
nsb-ce group.
To post to this group, send email to nsb...@googlegroups.com.
To unsubscribe from this group, send email to 
nsb-ce+unsubscr...@googlegroups.com.
For more options, visit this group at 
http://groups.google.com/group/nsb-ce?hl=en.