Sub Activity_Create(FirstTime As Boolean)
Activity.LoadLayout("1")
'Activity.LoadLayout("2")
If FirstTime Then
If File.Exists(File.DirDefaultExternal, "DBGCM.db") Then
TBanlegen = False
Else
TBanlegen = True
End If
PushService.SQL1.Initialize(File.DirDefaultExternal, "DBGCM.db", True)
End If
If TBanlegen = True Then
Modul1.CreateTables
End If
'Modul1.InsertManyRows
LogTable1
End Sub