Pu££3y
-
Total de itens
14 -
Registro em
-
Última visita
Posts postados por Pu££3y
-
-
ai galera Tudo Bem ??
é o Seguinte Tenho Um Formulário de Cadastro de Venda, uso um DbLookupComboBox para selecionar os itens de produto e colocar num StringGrid ...beleza... Ate ai
só Que Queria que no Evento OnCloseUp do ComboBox, chamasse outro FormularioZinho com um Edit só para Informar a Quantidade de itens Que ele Quer Comprar..
Tem Como, Quando Esse FormularioZinho Fechar ele retornar o Valor que O Cara Digitou no Edit dele e usar No Formulári principal de Venda????
Valeu Galera esPeranDu....
-
beleza valeu Pela Correção....
Por Isso que eu Buscava e aparecia Alguns Clientes Indesejados.....
Procurei a Propiedade Params E não Tem Uso a ADOQuery...
só tem Parameters Msmo
A mensagem é essa
[Error] Unit11.pas(39): Undeclared identifier: 'AsString'
Acho que não existe esse Metodo....
-
BLZZ VOh dá Uma Olhada NAunTinah Pensado Em cocatenar direto
Mais Tambem Encontrei Uma Maneira.... Olha só
DataModule2.Q_pessoa.SQL.Add('SELECT pessoa.*, cliente.limite, cliente.data_cad, cliente.situacao FROM pessoa INNER JOIN cliente ON pessoa.cod_pessoa = cliente.cod_pessoa WHERE pessoa.nome LIKE :filtro');
e na Hora de atribuir O valor Do Parameto
DataModule2.Q_pessoa.Parameters.ParamByName('filtro').Value:='%'+edit1.Text+'%';
O Percent faz o Papel De Aspas Simples......
resolveu Direitinho......
valeu entaumm MICHEUS Abraçossss.....
-
DataModule2.Q_pessoa.Parameters.ParamByName('filtro').AsString:=edit1.Text;
não Compila ...
A PArte do execSQL nem Tinha Me Ligado .... faço Outas Consultas Usando O OPEn só que Nessa Me esqueci...
você Disse que fica Por Conta Do Drive Tem que Instalar AlGum Componete Adicional???
Tem Como Inserir Por Codigo ASCI tipo #31 que é o enter qual é o Do ASpas simples????
... Ow já Toh viajando D+
-
não pois O valor Eu Recebo De Um edit
O valor Texto que o cara digita no edit pego no Evento OnKeyPress pra fazer um filtro tipo uma Busca....
procedure Tlist_cli.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
DataSource1.DataSet.Close;
DataModule2.Q_pessoa.SQL.Clear;
DataModule2.Q_pessoa.SQL.Add('SELECT pessoa.*, cliente.limite, cliente.data_cad, cliente.situacao FROM pessoa INNER JOIN cliente ON pessoa.cod_pessoa = cliente.cod_pessoa WHERE pessoa.nome LIKE :filtro');
DataModule2.Q_pessoa.Parameters.ParamByName('filtro').Value:=edit1.Text;
ShowMessage(DataModule2.Q_pessoa.SQL.Text);
DataModule2.Q_pessoa.ExecSQL;
DataSource1.DataSet.Open;
end;
não Funcionou daquela Maneira.....
Tem Outro jeitO?????
-
Aii galera tenho um Duvida na Hora de fazer o seguinte comando SQL:
SELECT pessoa.*, cliente.limite, cliente.data_cad, cliente.situacao
FROM pessoa INNER JOIN cliente ON pessoa.cod_pessoa = cliente.cod_pessoa
WHERE pessoa.nome LIKE ':parameto';
mais Na Hora de atribuir esse valor para a query:
Q_pessoa.SQL.Add('SELECT pessoa.*, cliente.limite, cliente.data_cad, cliente.situacao FROM pessoa INNER JOIN cliente ON pessoa.cod_pessoa = cliente.cod_pessoa WHERE pessoa.nome LIKE :parameto');
não tem Como colocar as aspas simples LIKE ':parameto';
Como faço pra fazer o Comando tipo
select * from pessoa where nome like 'pulley'; lá No delphi????
Flwss galera esperanduuu Valeuuu Abraçosss.... ahh URGENTE se não Toh No SAL...
-
Ai Galera Como faço que um "Edit" Receba apenas Numeros....
alem dos caracteres "Enter" "," "TAB" "."
URGENTE!!!!... Flwsss Galera Abraçossss... :o
Ahi galera Descobrii Fica assim...
procedure TFORM1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
if (Key in ['0'..'9',#13,'.',',']) then
begin
end
else
Key := #0;
end;
Agora não Me Lembro Qual o Caracter Representa o Backspace e o Delete se alguém Souber Responde Ahi beleza...... Valeuuu
-
Ai Galera Como faço que um "Edit" Receba apenas Numeros....
alem dos caracteres "Enter" "," "TAB" "."
URGENTE!!!!... Flwsss Galera Abraçossss... :o
-
Edite seu post e adicione os códigos dos dois arquivos do include(). Pode haver erro ali também.
TiRei As Includess só são Codigos de conexao e estao certos
Na verdade quando atribuo os dados que vieram pelo metdo POST para a Session As Vaariaves de SESION não pegam o Valor acho que foi um erro quando instalei o PHP vou Instalar dnovo e testar
alguém tem um php.ini do php4 configurado Certinho ????? sepuder manda aeeee.... Vlwssss
-
Usa A função ATOI...
$inteiro=Atoi($caracter);
FLwssss......
-
Poste o código para analisarmos.
Esse e o LOGIN.PHP
<?php include('include/inicio.php'); include('include/conecta.php'); // Na Conect esta os codigos de conexão tipo pg_connect Conecta beleza // e na Inicio Inicializa As sessões session_start().... function voltar($url){ print("<script language='javascript'>window.open('".$url."','_parent');</script>"); } function msg($msg){ print("<script language='javascript'>window.alert('".$msg."');</script>"); } if(!$bdcon) echo "Erro ao Conectar o baco de dados"; else { $form_senha['login'] = pg_escape_string($_POST['login']); $form_senha['senha'] = pg_escape_string($_POST['senha']); $form_senha['bt_entrar'] = pg_escape_string($_POST['bt_entrar']); if((!empty($form_senha['login'])) && (!empty($form_senha['senha']))){ $sql="SELECT * FROM usuario ". "WHERE login='".$form_senha['login']."' AND senha='".$form_senha['senha']."'"; $res=pg_query($bdcon,$sql); $log=0; $row=pg_fetch_assoc($res); if(($row['login']==$form_senha['login']) && ($row['senha']==$form_senha['senha']) ) { //echo msg('Seja Bem Vindo '.$form_senha['login'].'!!'); $_SESSION['user_nome'] = $form_senha['login']; $_SESSION['user_id'] = $row['id_usuario']; echo msg('Seja Bem Vindo '.$_SESSION['useu_nome'].'!!'); $log=1; voltar("index.php"); } if($log==0) echo msg('Login e/ou Senha Incoreto(s)!!!!!....'); } else echo msg('Digite Seu Login e Senha!!!!!....'); desconecta($bdcon); } ?>
Index.PHP<? include("include/inicio.php"); include('include/conecta.php'); function voltar($url){ print("<script language='javascript'>window.open('".$url."','_parent');</script>"); } if (empty($_SESSION['user_nome']) && empty($_SESSION['user_id']) ){ echo alert('ACESSO NEGADO!!!!'); echo voltar('login.php'); } ?>
Mais Acho que o Erro é Devido aquele Warning...... Sabe o Que é?????
-
Tirei Todos os Echo e prints Mas Continua Dando o ERRO Será que é Um erro no PHP.INI
??????
-
Tenho uma pagna de login que pega no banco o login e a senha digitado beleza e Funciona.....
mais quando atribui o variavel que tem o login a session não pega... OBs..
$_SESSION['user_nome'] = $form_senha['login'];
$form_senha['login'] possui o login pegado do banco !!!!!!!CERTEZA QUE SIM!!!!!!!!
então quando inicializo os dados da sessão no Index.php ele diz que a variavel
$_SESSION['user_nome'] está vazia OLHA
if (empty($_SESSION['user_nome']) && empty($_SESSION['user_id']) )
{
echo alert('ACESSO NEGADO!!!!');
echo voltar('login.php');
}
e dá o seginte warning...
Warning: session_start(): Cannot send session cache limiter - headers already sent (output started at D:\ley\intranet\index.php:2) in D:\ley\intranet\include\inicio.php on line 9
se algem souber por favor Me ajodemmm ValeUUUU....
Retorno De Formulário
em Delphi, Kylix
Postado
ai Churc
Valeww Pela Dica funcionou Direitinho Usei Um Form mesmo pois Tenho que fazer algumas Restrições De inserção no Edit + Achei Legal Tambem pelo Outro metodo o "InputBox" não Sabia Dele
Waleuuuuu Amigo muito Obigadooo......