Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > БД в Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 03.02.2014, 19:20   #11
Serge_Bliznykov
Старожил
 
Регистрация: 09.01.2008
Сообщений: 26,238
По умолчанию

так,
1) база ЯВНО формата SQLite
разговоры про dBase сразу мимо кассы!

2)
Цитата:
БД под паролем или нет?
БД же у Вас, Вам виднее.
Мы только гадать можем.


p.s. если Вы увидели содержимое, то откуда возникает сомнение про пароль? Было бы под паролем - так Вы бы ни в одной программе содержимое не увидели!
Serge_Bliznykov вне форума Ответить с цитированием
Старый 03.02.2014, 19:42   #12
ZuBy
Участник клуба
 
Аватар для ZuBy
 
Регистрация: 29.09.2008
Сообщений: 1,234
По умолчанию

Цитата:
Сообщение от Serge_Bliznykov Посмотреть сообщение
p.s. если Вы увидели содержимое, то откуда возникает сомнение про пароль? Было бы под паролем - так Вы бы ни в одной программе содержимое не увидели!
В силу того что я не имел до этого дела с БД, у меня такой вопрос еще созрел
Можно-ли определенную часть запаролить? т.е. например бинарные данные
ZuBy вне форума Ответить с цитированием
Старый 21.11.2017, 19:14   #13
Mr.Robot
Новичок
Джуниор
 
Регистрация: 28.06.2017
Сообщений: 2
По умолчанию

для занесения русских символов в базу данных на компоненте zConnection1.properties
заносим

Код:
codepage=cp1251
default-character-set=cp1251
Код:
procedure TForm1.Button1Click(Sender: TObject);
begin
ZConnection1.Database:=ExtractFilePath(ParamStr(0))+'main.db'; //имя базы данных
ZConnection1.Protocol := 'sqlite';
ZConnection1.LoginPrompt := False; // to prevent showing of the connection dialog
ZConnection1.Connect; //Конектимся

if ZConnection1.Connected=True then //Если подключились тогда
begin
ZQuery1.Connection:=ZConnection1;
zQuery1.Close;
zQuery1.SQL.Clear;
ZQuery1.SQL.Text := 'SELECT * FROM `Messages`';
DataSource1.DataSet:= ZQuery1;
DBGrid1.DataSource:=DataSource1;
ZQuery1.Active := True;
//ShowMessage('Вы успешно присоединились к базе данных!!!');
end else
begin
//ShowMessage('Нихрена не подключился');
end;

end;

procedure TForm1.DBGrid1DrawColumnCell(Sender: TObject; const Rect: TRect;
DataCol: Integer; Column: TColumn; State: TGridDrawState);
begin

if Assigned(Column) then
begin
DBGrid1.Canvas.FillRect(Rect);
DBGrid1.Canvas.TextRect(Rect, Rect.Left, Rect.Top, ' '+Column.Field.AsString);
end;

end;

Последний раз редактировалось Вадим Мошев; 24.11.2017 в 05:39.
Mr.Robot вне форума Ответить с цитированием
Старый 22.11.2017, 02:25   #14
kropotkina-alice
Форумчанин
 
Аватар для kropotkina-alice
 
Регистрация: 27.10.2014
Сообщений: 594
По умолчанию

Цитата:
Сообщение от Mr.Robot Посмотреть сообщение
для занесения русских символов в базу данных на компоненте zConnection1.properties заносим
Это вы по привычке с потусторонними силами общаетесь?
Тема умерла почти 4 года назад...
kropotkina-alice вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Чем открыть формат ? Баграт Помощь студентам 18 18.09.2012 14:41
можно ли открыть форму access в delphi...таблицы подключаются....а форму можно подключить?? Анна1217 Помощь студентам 3 06.04.2012 07:56
В игре файл с расширением ".HUF" Чем можно его открыть? EVGENIEL Gamedev - cоздание игр: Unity, OpenGL, DirectX 1 20.10.2011 15:08
Чем в Делфи можно открыть TIF(F) изображение dimfil Компоненты Delphi 2 12.12.2007 09:03