[Gambas-user] gmd crashes on PostgreSQL (other 1/2 solved)

Charlie Reinl Karl.Reinl at ...9...
Mon Feb 16 21:19:54 CET 2004


Salut,

I added the following 

PUBLIC SUB tbvData_Data(Row AS Integer, Column AS Integer)
  $rData.MoveTo(Row)
  IF $sCharset THEN
    tbvData.Data.Text = Conv(Str($rData[tbvData.Columns[Column].Text]), 
$sCharset, Desktop.Charset)
  ELSE
    tbvData.Data.Text = Str($rData[tbvData.Columns[Column].Text])
  ENDIF
  CATCH
    ' Convert Error
    IF  Error.code = 31 THEN
      LabelWarn.Visible=TRUE 
      LabelWarn.Text = "Message.Error is up"
      Message.Error("[" & Error.code & "]  " & Error.text & gb.newline & 
gb.newline & " try to switch off 'Use encoding (" &  $sCharset & ")'")
      fmain.mnuUseDatabaseEncoding_Click()      
      LabelWarn.Text = ""
      LabelWarn.Visible=FALSE 
    ENDIF
    Error.clear
END

the following to catch the 'Unsupported String Conversation' Error.

Amicalement
Charlie

to catch the 'Unsupported String Conversation'





More information about the User mailing list