merhaba ben kullanıcı giriş ekranında kullanıcının aktif ve ya pasif durumunu sql üzerinde sorgulamak istiyorum sql üzerinde bir sütun açtım oraya gerekli verileri girdim ancak*konu hakkında nasıl bir kod yapısı kullana bilirim kavrayamadım kullandığım kod yapısı aşağıdaki gibi
procedure Tanaform1.Rectangle3Click(Sender: TObject);
begin
* with UniQuery1 do
* begin
* * Close;
* * SQL.Clear;
* * SQL.Text := 'select * from uye where (username=:kdi and uye_pw=
swrd)';
* * ParamByName('kdi').Value := usrnm.Text;
* * ParamByName('pswrd').Value := sfrr.Text;
* * open;
* end;
* if UniQuery1.RecordCount > 0 then
* begin
* * ShowMessage('Giriş Başarılı');
* * form1.show;
* * form1.Edit1.Text := usrnm.Text;
* end
* else
* begin
* * if UniQuery1.RecordCount
procedure Tanaform1.Rectangle3Click(Sender: TObject);
begin
* with UniQuery1 do
* begin
* * Close;
* * SQL.Clear;
* * SQL.Text := 'select * from uye where (username=:kdi and uye_pw=
swrd)';* * ParamByName('kdi').Value := usrnm.Text;
* * ParamByName('pswrd').Value := sfrr.Text;
* * open;
* end;
* if UniQuery1.RecordCount > 0 then
* begin
* * ShowMessage('Giriş Başarılı');
* * form1.show;
* * form1.Edit1.Text := usrnm.Text;
* end
* else
* begin
* * if UniQuery1.RecordCount
