مشاهده نسخه کامل
: ميخواهم username & password درست كنم توضيح مي دهيد بايد چكار كنم؟
hamidehsadat
04-04-2007, 09:41
ميخواهم username & password درست كنم توضيح مي دهيد بايد چكار كنم؟
سوال ديگر
براي اينكه كل اطلاعات يكجدول در dbgrid نشان داده بشود بايد چكار كنم
ghoghnoose_dana
04-04-2007, 23:29
سلام
در مورد سوال اولت این یوزر و پسوردو واسه چه کاری میخواهی اگه واسه کارهای معمولی میخواهی میتونی از encript و decriptاستفاده کنی اگه واسه بانک اطلاعاتی میخواهی معمولا از هر بانکی که استفاده میکنی این قابلیتو داره میتونی تو سایت بگردی ختما پیدا میکنی
در مورد سول دومت هم بستگی داره با چی به بانکت وصل میشی
hamidehsadat
05-04-2007, 16:13
با bde , datasource به بانكم وصل ميشوم
ghoghnoose_dana
05-04-2007, 23:23
خب وقتی با datasource و یک tableوصل میشین به بانک وقتی خاصیت activeروtrueمیکنین تمام رکورها نشون داده میشن
ghoghnoose_dana
06-04-2007, 00:09
ببخشید این کد شاید به دردتون بخوره
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, DB, DBTables, Grids, DBGrids;
type
TForm1 = class(TForm)
DataSource1: TDataSource;
DBGrid1: TDBGrid;
Table1: TTable;
procedure FormCreate(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
{$R *.dfm}
procedure TForm1.FormCreate(Sender: TObject);
const
s='C:\Program Files\Common Files\Borland Shared\Data\mobin.db';
begin
if not fileexists(s) then
halt;
else
begin
table1.TableName:='C:\Program Files\Common Files\Borland Shared\Data\sam.db';
datasource1.DataSet:=table1;
dbgrid1.DataSource:=datasource1;
// agar 3 fild dar jadval dashte bashim//
dbgrid1.Columns.Add;
dbgrid1.Columns[0].FieldName:='name';//name fild avar//
dbgrid1.Columns.Add;
dbgrid1.Columns[1].FieldName:='sen';//name fild dovom//
dbgrid1.Columns.Add;
dbgrid1.Columns[2].FieldName:='shahr';//name fild sevom//
table1.Active:=true;
end;
end;
end.
vBulletin , Copyright ©2000-2025, Jelsoft Enterprises Ltd.