Ir para conteúdo

POWERED BY:

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

_M!K0L_

[Resolvido] []Delphi + SQL, Não está querendo aparecer as c

Recommended Posts

1 Duvida

 

Tipo tenho no MSSQL

 

Imagem Postada

Imagem Postada

 

e no aplicativo..

procedure TForm1.FormCreate(Sender: TObject);
begin
Query1.SQL.Add('SELECT memb___id, memb_name, Creditos, Vip FROM dbo.MEMB_INFO');
Query1.ExecSQL;
Query1.Open;
end;

 

mais quando eu do RUN no aplicativo so aparece as Colunas Creditos e Vip

Imagem Postada

 

 

2 Duvida [ Resolvida ]

 

tenho o código.

procedure TForm1.Button1Click(Sender: TObject);
var
conta: String;
dias: String;
begin
conta := Edit1.Text;
dias := Edit2.Text;
Query1.SQL.Clear;
Query1.SQL.Add('UPDATE dbo.MEMB_INFO SET Vip=1, Creditos="' + dias + '" WHERE memb___id="' + conta + '"');
 try
   Query1.ExecSQL;
   except
 end;
end;

dai ta no aplicativo eu boto a conta

Conta := 'mikol';

Dias := '30';

 

ali onde tem Adicionar Vip

Imagem Postada

 

mais ele me da o seguinte error..

Imagem Postada

 

 

Alguém pode me ajudar ??

http://forum.imasters.com.br/public/style_emoticons/default/natal_biggrin.gif

Compartilhar este post


Link para o post
Compartilhar em outros sites

A 2 Duvida ja resolvi mais ainda estou tendo problemas com a Primeira...

 

,,

Resolução da Segunda Questão é..

procedure TForm1.Button1Click(Sender: TObject);
begin
Query1.SQL.Clear;
Query1.SQL.Add('UPDATE dbo.MEMB_INFO SET Vip=1, Creditos = :Dias WHERE memb___id = :Conta');
Query1.ParamByName('Dias').AsString := Edit2.text;
Query1.ParamByName('Conta').AsString := Edit1.text;
try
   Query1.ExecSQL;
   except
end;
end;

;D

Compartilhar este post


Link para o post
Compartilhar em outros sites

Para o primeiro problema tente o seguinte:

 

Query1.Close;
Query1.SQL.Clear;
Query1.SQL.Add('SELECT memb___id, memb_name, Creditos, Vip FROM dbo.MEMB_INFO');
Query1.Open;

Não é necessário o comando Query1.ExecSQL; ele é utilizado nos comandos de sql para insert, update, delete, etc...

Compartilhar este post


Link para o post
Compartilhar em outros sites

nun acredito que éra só isso ¬¬

asidhASOd

 

..

vlws

vo testar!!!

 

 

ti amoo

meoww

:D

 

(mentira)...

Compartilhar este post


Link para o post
Compartilhar em outros sites

deu certo não

=/

 

o interessante é que so aparece o que tem NUMEROS, o que tem TEXTO não aparece porque??

Compartilhar este post


Link para o post
Compartilhar em outros sites

o que for estranho no meu computador e ele roda normal...

iagsdiyAGSduyAGSuySDgUYsD

 

agora se ele roda estranho ele ta normal..

ASODUhausd

Compartilhar este post


Link para o post
Compartilhar em outros sites

×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.