Sub cc_Result( Success As Boolean, Dir As String, FileName As String )
Dim path As String
Log($"cc_Result( ${Success}, ${Dir}, ${FileName})"$)
If Success = True Then
Dim bm As Bitmap
'Log( "MapDir = " & Starter.MapDir & ", MapFile = " & Starter.MapFile )
bm.Initialize( Dir, FileName )
ImageView1.SetBackgroundImage( bm )
'path = GetPathFromContentResult( MapFile )
'MapFile = path.SubString( path.LastIndexOf( "/" )+1 )
'MapDir = path.SubString2( 0, path.LastIndexOf( "/" ))
'SaveSettings
'ImageView1.SetBackgroundImage( Null )
'LoadMap
End If
End Sub ' cc_Result()