Цитата:
|
Сообщение от SetaJ
Долго отвечаете товарищи программисты, этот вопрос уже решен!!!
|
Ох уж простите пожалуйста нас таких не расторопных.
Цитата:
|
Сообщение от SetaJ
теперь необходим перенос информации из поля БД в поле таблицы Excel
|
Не раз обсуждалось.
http://www.delphisources.ru/forum/sh...09&postcount=8
Цитата:
|
Сообщение от SetaJ
А еще лучше, если поможете создать парольный вход в систему с условиями дискрецеонной политики безопасности (т.е. на основе матрицы доступа)
|
Создать таблицу в БД, в данном примере TblPas.
Код:
procedure TForm4.Button1Click(Sender: TObject);
Var log, pas:string;
begin
log:=Edit1.Text;
pas:=Edit2.Text;
if not DM.TblPas.Locate('login; pas', VarArrayOf([log, pas]),[]) then
begin
ShowMessage('Введен не правильный пароль или логин!');
exit;
end
else MainForm.ShowModal;
end;