31 #pragma package(smart_init)
32 #pragma resource "*.dfm"
48 Icon->Handle = Application->Icon->Handle;
50 char FileName[MAX_PATH + 1];
52 const AnsiString ExtraKeys[] = {
"Expected Versions", NULL};
54 GetModuleFileName(HInstance, FileName, MAX_PATH);
57 Caption = AnsiString().sprintf(
"%s details", LowerCase(ExtractFileName(FileName)).c_str());
72 for (i = 0; (ExtraKeys[i] != NULL) ; i++)
75 ListItem->Caption = ExtraKeys[i];
76 ListItem->SubItems->Add(VI->
Key[ExtraKeys[i]]);