function load_user_schiffe()


   Query = "SELECT * FROM `schiff` WHERE besitzer ='"+ user[0,1] +"'"
   Result = MySQL.Query(Query)
   If Not Result Then
      Print("Error: Query failed")
      Print(" "+MySQL.GetError())
      MySQL.Close()
      End
   EndIf
   

     Local rows:Int = String(result.Rows).toint()
   Print(String(Rows)+" Entrys:")

   Local i%,k%=0

   Print( "rows:"+rows)
   Global user_schiffe:String[rows,50]
   For Row = EachIn Result
     For i = 0 To 49
        user_schiffe[k,i]=Row.GetString(i)
     Next
     k=k+1
   Next
   

   
   For k= 0 To rows-1
     For i = 0 To 49
       Print ("-" + user_schiffe[k,i] + "-")
     Next
   Next
  Result.Free()

EndFunction

Function list_schiffe()
   Local lx%, ly%
   For i = 0 To 5
      SetColor(255,255,255)
      'DrawText("|" + user_schiffe[i,1] + "|" + user_schiffe[i,2] + "|",lx,ly)
      ly = ly + 10
    Next
   SetColor(colora,colorb,colorc)
EndFunction