[Gambas-user] Retrieving picture from Database Mysql

[Steven Lobbezoo]

Maybe the attached will work, it works 100% for me !
Steven


Le lundi 9 avril 2007 04:17, Hamilton Geminiano Andrioli Junior a écrit :
> Dear friends...
> I really nee help on retrieving pictures from a blob field inside my
> MySql Database.
> The function you´ve sent to me, do not work....
> please...
>
> Help.....
>
> Thanks a lot...
>
> Hamilton From Brazil.......
>
> -------------------------------------------------------------------------
> Take Surveys. Earn Cash. Influence the Future of IT
> Join SourceForge.net's Techsay panel and you'll get the chance to share
> your opinions on IT & business topics through brief surveys-and earn cash
> http://www.techsay.com/default.php?page=join.php&p=sourceforge&CID=DEVDEV
> _______________________________________________
> Gambas-user mailing list
> Gambas-user at lists.sourceforge.net
> https://lists.sourceforge.net/lists/listinfo/gambas-user
-------------- next part --------------
A non-text attachment was scrubbed...
Name: Photos.class
Type: application/x-java
Size: 9601 bytes
Desc: not available
URL: <http://lists.gambas-basic.org/pipermail/user/attachments/20070409/2697f496/attachment.bin>
-------------- next part --------------
# Gambas Form File 1.0

{ Form Form
  MoveScaled(0,0,99,75)
  'Move(0,0,693,525)
  Tag = "V 382=1594"
  Text = ("")
  { PictureBoxFullSize PictureBox
    MoveScaled(24,1,74,70)
    'Move(168,7,518,490)
    Stretch = True
    Border = Border.Etched
  }
  { Panel1 Panel
    MoveScaled(0,0,23,70)
    'Move(0,0,161,490)
    Border = Border.Etched
    { GridViewThumbs GridView
      MoveScaled(1,1,21,68)
      'Move(7,7,147,476)
      Background = Color.Background
      Expand = True
      Scrollbar = Scroll.Vertical
      Border = False
    }
  }
  { HBox1 HBox
    MoveScaled(0,70,23,4)
    'Move(0,490,161,28)
    { ToolButtonRemove ToolButton
      MoveScaled(1,0,4,4)
      'Move(7,0,28,28)
      ToolTip = ("Supprimer l'image")
      Text = ("")
      Picture = Picture["Images/list-remove.png"]
    }
    { ToolButtonAdd ToolButton
      MoveScaled(5,0,4,4)
      'Move(35,0,28,28)
      ToolTip = ("Ajouter\nune image")
      Text = ("")
      Picture = Picture["Images/list-add.png"]
    }
    { Separator1 Separator
      MoveScaled(9,0,1,4)
      'Move(63,0,7,28)
    }
    { ToolButtonUp ToolButton
      MoveScaled(10,0,4,4)
      'Move(70,0,28,28)
      ToolTip = ("Poussez \nl'image vers\nla haute")
      Text = ("")
      Picture = Picture["Images/go-up.png"]
    }
    { ToolButtonDown ToolButton
      MoveScaled(14,0,4,4)
      'Move(98,0,28,28)
      ToolTip = ("Poussez \nl'image vers\nla bas")
      Text = ("")
      Picture = Picture["Images/go-down.png"]
    }
    { ToolButton1 ToolButton
      MoveScaled(18,0,4,4)
      'Move(126,0,28,28)
      ToolTip = ("Aide")
      Text = ("")
      Picture = Picture["Images/messagebox_info.png"]
    }
  }
  { Panel2 Panel
    MoveScaled(24,71,74,4)
    'Move(168,497,518,28)
    { description TextBox
      MoveScaled(0,0,45,3)
      'Move(0,0,315,21)
      Text = ("")
    }
    { Chercher Button
      MoveScaled(62,0,12,3)
      'Move(434,0,84,21)
      Background = &H4E8036&
      Foreground = &HFFFFBF&
      ToolTip = ("Appuyer pour faire\ndes mutations dans\nle base des données")
      Text = ("Allez-y")
    }
    { Close Button
      MoveScaled(47,0,13,3)
      'Move(329,0,91,21)
      Background = &H800000&
      Foreground = &HFFFFBF&
      ToolTip = ("Appuyer pour \nfermer cette\nfenêtre, annuler\ntout changement")
      Text = ("Annuler")
    }
  }
}