[delphi-br] Fw: Problema...!!!
Galera mais um problema cabeludo ..
Estava fechando o meu projeto, não sei o que aconteceu mais apaguei algum END
errado .. e sem querer eu acabei salvando o projeto.
Ja tentei de todos os jeitos e nada ... eu apaguei alguam coisa sem querer ...
Esta apresentando a seguinte mensagem.
Logo apos segue o codigo..
Exception class EReadError with message 'Invalid property value'. Process
Venus.exe
program Venus;
uses
Forms,
U_Venus in 'U_Venus.pas' {frmCodBarras},
U_DM_Venus in 'U_DM_Venus.pas' {DmCodBarras: TDataModule};
{$R *.res}
begin
Application.Initialize;
Application.Title := 'Venus - Sistema de Impressão de Código de Barras';
Application.CreateForm(TDmCodBarras, DmCodBarras);
Application.CreateForm(TfrmCodBarras, frmCodBarras);
Application.Run;
end.
unit U_Venus;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, ExtCtrls, DBCtrls, Grids, DBGrids, StdCtrls, Buttons, ComCtrls,
Registry,
FileCtrl, Menus, Mask, dblookup, jpeg;
type
TfrmCodBarras = class(TForm)
PageControl1: TPageControl;
tbsImpressao: TTabSheet;
Panel1: TPanel;
Label5: TLabel;
Label6: TLabel;
edtCodProd: TEdit;
Panel2: TPanel;
BitBtn2: TBitBtn;
edtQuantidade: TEdit;
Panel3: TPanel;
Label1: TLabel;
Label2: TLabel;
Label3: TLabel;
Label4: TLabel;
DBText1: TDBText;
DBText2: TDBText;
DBText3: TDBText;
DBText4: TDBText;
Label7: TLabel;
DBText5: TDBText;
tbsConfigura: TTabSheet;
Panel4: TPanel;
Panel5: TPanel;
BitBtn1: TBitBtn;
Panel6: TPanel;
RadioGroup1: TRadioGroup;
rbPortaLPT1: TRadioButton;
rbPortaLPT2: TRadioButton;
rbPortaCom1: TRadioButton;
rbPortaCom2: TRadioButton;
tbsEAN: TTabSheet;
Panel7: TPanel;
Panel8: TPanel;
Panel9: TPanel;
Label8: TLabel;
Label9: TLabel;
edtEAN1: TEdit;
edtEAN2: TEdit;
tbsArquivos: TTabSheet;
Panel10: TPanel;
Panel11: TPanel;
Panel12: TPanel;
EdtLote: TEdit;
BitBtn3: TBitBtn;
FileListBox1: TFileListBox;
FilterComboBox1: TFilterComboBox;
DirectoryListBox1: TDirectoryListBox;
DriveComboBox1: TDriveComboBox;
Label11: TLabel;
TabSheet1: TTabSheet;
edtArq: TEdit;
BitBtn4: TBitBtn;
Label12: TLabel;
Image1: TImage;
DirectoryListBox2: TDirectoryListBox;
Label13: TLabel;
DriveComboBox2: TDriveComboBox;
edtQtde: TEdit;
private
function VerificaData: Boolean;
procedure BitBtn4Click(Sender: TObject);
procedure BitBtn3Click(Sender: TObject);
procedure edtEAN1Exit(Sender: TObject);
procedure FormCreate(Sender: TObject);
procedure edtCodProdChange(Sender: TObject);
procedure BitBtn1Click(Sender: TObject);
procedure BitBtn2Click(Sender: TObject);
public
function tbStrZero(const I: integer; const Casas: byte): string;
end;
var
frmCodBarras: TfrmCodBarras;
Porta, Diretorio : String;
ArqReg: TRegIniFile;
texto : String;
implementation
uses U_DM_Venus, DBClient;
{$R *.dfm}
procedure TfrmCodBarras.BitBtn1Click(Sender: TObject);
begin.
.
.
.
..
[As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Erro
Galera, Estou com um problema no meu formulario. Quando fecho o formulario da um Application error, com a seguinte mensagem: Exception EInvalidPointer in module SendMail.Exe at 3AA5. Invalid pointer Operation. Tirei todas as rotinas que tenho no Form.Close, FormCloseQuery .. para ver se tinha algum problema . mais mesmo assim continua .. Alguem sabe o que pdoe ser ?? Abraços Filippe Maymone [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Envio de e-mail
Galera, Estou fazendo um sistema de envio de e-mail ... Criei estou usando um ClientDataSet com um banco de dados XMLcom os campos Nome, email So que preciso que envie o e-mail para toda a lista contida no banco .. Olha o que eu fiz ..mais naum esta indo ... frmCadastro.ClientDataSet1.First; While not frmCadastro.ClientDataSet1.EOF do if frmCadastro.ClientDataSet1mail.AsString '' then begin with IdMessage1 do begin Body.LoadFromFile(ListBoxAnexos.Items[0]); Recipients.EMailAddresses := frmCadastro.ClientDataSet1mail.AsString; frmCadastro.ClientDataSet1.Next; end; end; IdMessage1.BccList.EMailAddresses := EdtBCC.Text; IdMessage1.CCList.EMailAddresses := EdtCC.Text; Alguem tem alguma ideia ai ... Abraços Filippe Maymone [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Re: [lista-delphi] Envio de e-mail
Acho que acabei de descobrir na tentativa e erro Recipients.Add.Address := frmCadastro.ClientDataSet1mail.AsString; frmCadastro.ClientDataSet1.Next; Abraços - Original Message - From: Filippe Maymone - INFO To: delphi-br@yahoogrupos.com.br Cc: [EMAIL PROTECTED] Sent: Wednesday, March 26, 2008 4:49 PM Subject: [lista-delphi] Envio de e-mail Galera, Estou fazendo um sistema de envio de e-mail ... Criei estou usando um ClientDataSet com um banco de dados XMLcom os campos Nome, email So que preciso que envie o e-mail para toda a lista contida no banco .. Olha o que eu fiz ..mais naum esta indo ... frmCadastro.ClientDataSet1.First; While not frmCadastro.ClientDataSet1.EOF do if frmCadastro.ClientDataSet1mail.AsString '' then begin with IdMessage1 do begin Body.LoadFromFile(ListBoxAnexos.Items[0]); Recipients.EMailAddresses := frmCadastro.ClientDataSet1mail.AsString; frmCadastro.ClientDataSet1.Next; end; end; IdMessage1.BccList.EMailAddresses := EdtBCC.Text; IdMessage1.CCList.EMailAddresses := EdtCC.Text; Alguem tem alguma ideia ai ... Abraços Filippe Maymone [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Agenda para cons ultório médico
Olá, Não sei se voce tem mais no CD do ActiveDelphi, o cd de exemplos tem um exemplo lá de consultorio medio, não sei se é o que voce esta querendo, mais vale dar uma olhada. Abraços, - Original Message - From: Luís Henrique Casagrande To: delphi-br@yahoogrupos.com.br Sent: Monday, March 24, 2008 11:27 PM Subject: [delphi-br] Agenda para consultório médico Caros colegas, Estou precisando de uma agenda de marcação de consultas para clínica médica, preferencialmente com visual parecido com o MS Outlook? Quem tiver, favor entrar em contato comigo em pvt. Obrigado, Luis Henrique [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] [OFF TOPIC] Coletor de dados... qual comprar?
Murilo, Na empresa que trablho utilizamos um excelete, funciona perfeito, e trabalhamos com FIO, ambiente com muito Pó . .e ele nunca apresentou problemas. E acho que atende o qeu voce esta precisando ... Amanha te encaminho o modelo e empresa para entrar em contato ... Abraços. - Original Message - From: Murillo Proença To: delphi-br@yahoogrupos.com.br Sent: Wednesday, February 28, 2007 12:02 PM Subject: [delphi-br] [OFF TOPIC] Coletor de dados... qual comprar? Bom dia galera... estou desenvolvendo um sistema para controlar o fluxo de embalagens dentro da empresa. Fazendo o levantamento de todo o processo e todas as necessidades, chegamos a conclusão que no ponto de saída e entrada das embalagens vai se utilizar um Coletor de Dados para que haja total mobilidade. A dúvida é, qual coletor utilizar, fiz uma pesquisa e encontrei diversos modelos, com diversas características e diversos preços. Para ajudar um pouco, o sistema no coletor será bem simples, terá duas etapas: 1) Carrega-se o coletor com uma lista de separação. O usuário vai até as embalagens e lê o código de barras da mesma. Aí o usuário volta e descarrega esta lista, onde eu atualizo o sistema no desktop. 2) Quando volta as embalagens para a empresa, existe um outro coletor, onde o usuário vai lendo todos os códigos de barras e depois descarrega no sistema e eu dou baixa nos mesmos. Como se vê, o que vai estar no coletor é bem básico mesmo. Uma outra informação muito importante é com relação ao local, onde a temperatura é alta e a umidade também. Gostaria que me endicassem alguns modelos que tenham um melhor custo benefício para este meu sistema. Agradeço desde já, Murillo Proença [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Firebir X MDB
Galera, Eu tenho um banco MDB, e preciso migra-lo para o Firebird, eu estou utilizando o IbExpert ... Alguem pode dar uma força .. ?? Valeuz ... Filippe [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] CD - EXEMPLOS
Olá galera, Estou começando com Delphi agora, tenho algumas dificudades de criar telas de cadstros e demais telas dos sistemas. Verificando na NET tem o Cd do PLANETA DELPHI e Da revista ACTIVE DELPHI. Gostaria de saber de voces se os cds são bons ?? se alguem adiquiriu os cds /?? Sera que compensa, sera que vai me ajudar ??? abraços. Filippe Maymone [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Firebird
Galera, De banco de dados até hoje so trabalhei com o sql. Estou querendo alguma coisa free para fazer uns projetos em casa. Me indicaram e falara muito bem do Firebird, eu instalei aki mais estou sem noção nenhuma de como utilizar. Alguem tem alguma apostila boa ia para me ajudar ... ou alguma coisa ??? Valeuz [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Impressora Codigo de Barras
Emerson, Tente verificar se essa impressora so trabalha com a linguagem PPLA, eu etendo um poko da ZPL utilizadas nas zebras, as vezes elas trabalham com mais de uma liguagem, se ela aceitar ZPL me da um alo . .que te mando um exemplo... Aqui eu faço da seguinte forma, eu faço os comandos da ZPL e armazeno tudo em um StringList e jogo a lista para a porta da impressora acho que é o jeito mais facil ... Abraços, Filippe Maymone msn: [EMAIL PROTECTED] - Original Message - From: Emerson Cassio To: delphi-br@yahoogrupos.com.br Sent: Thursday, September 14, 2006 5:02 PM Subject: [delphi-br] Impressora Codigo de Barras Pessoal, Tenho que agregar ao aplicativo de um Cliente a Geração e Impressão de Código de Barras, ele Tem a Impressora Argox Mod. OS-214TT Pelo que Pesquisei ela usa Linguagem PPLA. Alguem tem alguma rotina ou coisa parecida para imprimir nessa impressora? Qualquer ajuda será bem vinda, uma vez que nunca trabalhei com essas impressoras. Emerson Cassio [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Banco SQL .. quais DLL
Galera, Sou novo no Delphi, fiz um software... e esta trabalhando com banco de dados SQL server. O Software vai ser usado em rede, tenho umas pasta compartilhada no servidor e os usuarios tem um atalho para acessar o EXE. Queria saber quais DLL, preciso colocar na maquina do usuario para ele conseguir acessar meu sistema, e se tem alguma forma de fazer com que eu não precise colocar DLL em todas as estações. Eu estou Usando DElphi 2006 com SQL SERVER 2000 e conexão DBExpress ... Obrigado .. e abraços, Filippe Maymone [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] IMPRESSORA ZEBRA
VAleu Galera ... Fiz como Elazar falou Montei uma StringList com os comandos ZPL, e adicionei ao comando os campos do banco de dados .. E Depois mandei toda a StringList para a porta desejada ... Deu certinho . .ficou perfeito ... Valeu galera por mais essa ... - Original Message - From: Walter Alves Chagas Junior [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: Thursday, August 24, 2006 9:19 AM Subject: RES: [delphi-br] IMPRESSORA ZEBRA Quando eu trabahei com esta impressora, eu mandava escrever os comandos direto na porta (serial ou paralela) aonde a impressora estava conectada. []s Walter Alves Chagas Junior Projeto e desenvolvimento de sistemas Telemont Engenharia de telecomunicações S/A Belo Horizonte - MG - Brasil [EMAIL PROTECTED] Fone: (31) 3389-8215 Fax: (31) 3389-8200 Parabens Telemont - Somos a 8ª maior empresa do Brasil no segmento de construção!! -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] nome de Filippe Maymone - Informatica Enviada em: quarta-feira, 23 de agosto de 2006 16:49 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] IMPRESSORA ZEBRA Olá Galera, Alguem sabe como eu faço para mandar uma impressão para uma impressora ZEBRA STRIPE S-600 ??? Sei que ela trabalha com linguagem ZPL. Os comandos ZPL ja estão prontos, pois eu faço essa impressão via DOS. COPY Nome_Arquivo.TXT LPT1 So que agora minha demanda de etiquetas cresceu, e eu preciso utilizar um banco de dados para passar os parametros para a impressão dessas etiquetas. alguem tem ideia de como faço isso ??? Obrigado, FILIPPE MAYMONE -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Links do Yahoo! Grupos [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Links do Yahoo! Grupos -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
