| 508 |  | entry.Name := 'menu_conn_' + IntToStr(i); | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 509 |  | entry.OnClick := menu_conns_itemClick; | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 510 |  | menu_conns.Add(entry); | 
 
 
 
 
 
 
 
 
 | 511 | – | entry := nil; | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 511 |  | end; | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 512 |  | end; | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 513 |  | end; | 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 | 520 |  | opend.InitialDir := AppSettings.DatPath; | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 521 |  | opend.Filter     := 'Compatible level files|*.dat;*.oni;*.oldb|Oni level (*.dat)|*.dat|OniSplit Archive (*.oni)|*.oni|OUP level database (*.oldb)|*.oldb|Any (*.*)|*'; | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 522 |  | if typedb then | 
 
 
 
 
 
 
 
 
 
 
 | 523 | < | opend.FilterIndex := 3 | 
 
 
 
 
 
 
 
 
 | 523 | > | opend.FilterIndex := 4 | 
 
 
 
 
 
 
 
 
 
 
 | 524 |  | else | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 525 |  | opend.FilterIndex := 2; | 
 
 
 
 
 
 
 
 
 
 
 
 
 | 526 |  | if opend.Execute then |