Keine Strings in CallFunction()?
Verfasst: 14.08.2009 19:25
seit PB.4.40 Beta 1 krieg ich bei
Die Meldung Zahl anstelle eines Strings erwartet.
Wenn ich table.l oder ähnliches schreibe kommt keine Meldung.
Hier der Code aus der DLL:
nach dem "zurückpatchen" auf PB. 4.31 erhalte ich keinen Fehler.
Mache ich einen Fehler , den PB 4.31 nicht erkennt oder handelt es sich um einen Bug?
Code: Alles auswählen
Procedure.s SqlNew(id.l, table.s, primarykey.l)
ProcedureReturn PeekS(CallFunction(1, "SqlNew", id, table, primarykey))
EndProcedure
Wenn ich table.l oder ähnliches schreibe kommt keine Meldung.
Hier der Code aus der DLL:
Code: Alles auswählen
ProcedureDLL.s SqlNew(id.l, table.s, primarykey.l)
String$ = ""
yy = 0
If DatabaseQuery(id, "SELECT * FROM " + table)
While NextDatabaseRow(id)
yy+1
If yy = primarykey
For z0.l = 1 To DatabaseColumns(id) - 1
String$ + "'" + GetDatabaseString(id, z0) + "'"
If z0 < DatabaseColumns(id) - 1
String$ + ", "
EndIf
Next z0
ProcedureReturn String$
EndIf
Wend
If z0 > 0
ProcedureReturn String$
Else
EndIf
Else
EndIf
EndProcedure
Mache ich einen Fehler , den PB 4.31 nicht erkennt oder handelt es sich um einen Bug?
