Displaying 1 result from an estimated 1 matches for "dirdlg".
Did you mean:
diddle
2004 Jan 08
3
pictorG
..._menu(ID_NEW) {message_box "New db"}
evt_menu(ID_OPEN) {
filedlg=FileDialog.new(self,''Open catalog'','''','''',''Picture organizer catalog *.poc|*.poc'',OPEN|CHANGE_DIR).show_modal}
evt_menu(ID_SETROOT) {
dirdlg=DirDialog.new(self,''Catalog base dir'',@root_dir)
self.root_dir=dirdlg.get_path if dirdlg.show_modal==ID_OK
}
evt_menu(ID_EXIT) {close TRUE }
evt_menu(ID_ABOUT) {message_box "pictorG - PICTure ORganizer by Gregory\n?Gergely Kontra","About pictorG&qu...