Помогите разобраться с кодом, очень надо!

[pav]

procedure TForm1.FormActivate(Sender: TObject);
var
Present: TDateTime;
Year, Month, Day : Word;
begin
with Session do
begin
ConfigMode := cmSession;
try
AddStandardAlias( 'kollej',
ExtractFilePath(ParamStr(0))+'DATA\',
'PARADOX');

Table2.Active:=True;
finally
ConfigMode := cmAll;
end;
end;
end;

В частности непонятно что такое:Session, ConfigMode, cmSession, cmAll. Ну и, вообще, в целом код.

 

[pav]

Надо.

 

[vital]

Надо.

Дорогой студент, код выше - это код в котором и обьяснять-то нечего. Вы либо знаете как осуществляется работа BDE и алиасовлибо нет. А с таким отношением, вам точно никто ничего писать не будет.

 

[Dock1100]

А весь код можно?
Наскоко я понят то
Session - переменная,
ConfigMode - еще одна переменная
cmSession,cmAll - одни из возможных значений ConfigMode

Больше по данному коду сказать больше ниче не могу

 

[Dock1100]

А вообще посмотри

Ссылка скрыта от гостей

внизу той страници есть идентичный код но с обяснениями