| 74 | //--------------------------------------------------------------------------- |
| 75 | |
| 76 | void __fastcall TGUI_Main_::Menu_File_Open_FileClick(TObject *Sender) |
| 77 | { |
| 78 | if (!OpenDialog1->Execute()) |
| 79 | return; |
| 80 | |
| 81 | //if (M_Options_CloseAllAuto->Checked) |
| 82 | // M_File_Close_AllClick(Sender); |
| 83 | |
| 84 | //Retrieving filenames, manage them |
| 85 | C->Menu_File_Open_Files_Begin(); |
| 86 | if (OpenDialog1->Files->Count==1) |
| 87 | //un fichier |
| 88 | C->Menu_File_Open_Files_Continue(GUI_Text(OpenDialog1->FileName)); |
| 89 | else |
| 90 | //Plusieurs selections |
| 91 | for (int Pos=0; Pos<OpenDialog1->Files->Count; Pos++) |
| 92 | C->Menu_File_Open_Files_Continue(GUI_Text(OpenDialog1->Files->Strings[Pos])); |
| 93 | |
| 94 | //Showing |
| 95 | View->GUI_Refresh(); |
| 96 | } |
| 97 | //--------------------------------------------------------------------------- |
| 98 | |
| 99 | void __fastcall TGUI_Main_::FormResize(TObject *Sender) |
nothing calls this directly
no test coverage detected