| # | Line 96 | Line 96 | end; | |
|---|---|---|
| 96 | ||
| 97 | procedure TForm1.FormCreate(Sender: TObject); | |
| 98 | begin | |
| 99 | < | {$IFDEF LOCALDATABASE} |
| 100 | < | IBDatabase1.DatabaseName := GetTempDir + sDatabaseName |
| 101 | < | {$else} |
| 99 | > | {$IFNDEF LOCALDATABASE} |
| 100 | IBDatabase1.DatabaseName := sDatabaseName | |
| 101 | {$ENDIF} | |
| 102 | end; | |
| – | Removed lines |
| + | Added lines |
| < | Changed lines |
| > | Changed lines |