Jump to content
Fórum Script Brasil

arce

Membros
  • Content Count

    45
  • Joined

  • Last visited

Community Reputation

0 Neutro

About arce

  • Birthday 09/23/1988

Perfil

  • Gender
    Male

Recent Profile Visitors

1010 profile views
  1. Olá Tenho uma classe principal chamada TTabela. Através de herança crio outras classes filhas, que neste exemplo vou chamar de TUsuario. Criei uma tela de pesquisa base que receberá as configurações de acordo com as informações da Classe referente. Gostaria de saber se é possível declarar uma variável private do tipo TTabela, e sobrepor o conteúdo com a classe filha (TUsuario), uma vez que preciso criar a classe em tempo de execução para uso dos métodos internos do form. unit untPsqBase; interface uses (...); type TfrmSPsqBase = class(TfrmBase) cbbFiltro: TComboBox; lbl1
  2. Jhonas, entrei em contato com o José Araujo do FortesReport, e ele passou duas soluções. 1ª. No finally substituir o código existente por: RLFilters.SelectedFilter := nil;, desta forma limpa o último filtro selecionado. 2ª. Destruir a instância do FiltroMatricial (comigo, o erro acontecia, pois tenho uma instância do DraftFilter em um form comum)
  3. Boa tarde Migrei recentemente para o Fortes Report CE, e estou com um problema relacionado aos filtros padrão e matricial. Meu código era desta forma, se o usuário escolhe a opção 1, e depois escolher a opção 3, e novamente a 2, o FortesReport atribuirá o filtro correto de acordo com a opção escolhida. Lembrando que quando o RLPrinDialogtSetup1.Filter recebe NIL, este interpreta como filtro padrão de impressão, limpando a referencia da Matricial. RLPrinDialogtSetup1.Filter := nil; try case(iOpImp)of 1: begin RLReport.Prepare; RLReport.PreviewModal(); end
  4. Bom dia Recentemente um de meus clientes trocou a placa da balança Jundiaí, e também tive que alterar a leitura do retorno. Resolvi criando parâmetros de leitura (caracter inicial. final e qtd de caracteres para leitura), de forma que agora consigo configurar em qualquer outra balança rodoviária. No método ACBrBAL1LePeso(Peso: Double; Resposta: String); a variável "Resposta" retorna o conteúdo da porta, cada modelo de balança retorna de forma diferente. Ex01: "# 00025685$# 00025685$# 00025686$" Ex02: " 00025685 00025685 00025686" No evento LePeso, associe
  5. ****** Registro trava ao dar UPDATE ou DELETE ****** Boa tarde. Tenho uma tabela chamada LOG que armazeno todos os logins do meu sistema. O problema é que um registro específico está travado, não consigo fazer UPDATE nele, e também não consigo DELETAR. Já tentei fazer um backup restore também e o processo trava na tabela LOG. Seria uma opção fazer extract metadata das tabelas exceto da "LOG", porém estou tentando não perder as informações desta. Alguém tem alguma dica? Obrigado!
  6. As configurações estão exatamente iguais, nas abas que você mencionou... não estou entendendo porque um projeto compila diferente do outro
  7. Bom dia Estou com o seguinte problema. Tenho dois projetos que compartilham boa parte das units. No processo de inicialização dos forms no dpr, cada projeto se comporta de uma forma. {$R *.res} begin Application.Initialize; Application.CreateForm(TdmPrincipal, dmPrincipal); Application.CreateForm(TfrmPrincipal, frmPrincipal); Application.CreateForm(TformBaseDados, formBaseDados); Application.CreateForm(TfrmLogin, frmLogin); Application.Run; end. No 1º projeto (q está da forma correta), ao inicializar; todos os forms listados são criados de uma só vez, e após a criação do
  8. Em minha empresa desenvolvemos usando Firebird e delphi 7, e vou iniciar um novo sistema, para tal quero usar o clienteDataSet para realizar as transações. Alguém teria algum fonte simples exemplificando o uso do componente? obrigado
  9. Jhonas Eu instalei e testei localmente o Visual SourceSafe na minha máquina e funcionou perfeitamente. Acontece, que preciso colocar os fontes na nuvem. Instalei corretamente no servidor do cloud (server 2003), o problema é q não estou conseguindo conectar a máquina local com a base de dados do VSS(cloud). no Share Location ... eu especifico o caminho EX: \\XSDJJJJ:C:\FONTES Mas ao tentar a conexão aparece a seguinte mensagem de erro: "\\XSDJJJJ:C:\FONTES does not contain a valid SourceSafe database(srcsafe.ini)" e no diretório, o arquivo "srcsafe.ini" exite. Aguardo resposta.
  10. Bom dia, trabalho em uma pequena empresa de desenvolvimento de Software, e como crescemos a cada semestre aumentamos o numero de colaboradores. Agora esta ficando complicado o gerenciamento do código fonte. Estou pesquisando sobre ferramentas específicas para sanar este problema, já q apesar dos nossos cuidados, esta havendo sobreposição de código. Utilizo Delphi 7, e nas minhas pesquisas soube do StarTeam (próprio da Borland) e do Visual SourceSafe 6.0. Mas ambos procurei para download sem sucesso, o ultimo até encontrei disponível mas está dando erro ao instalar. aguem tem alguma sugestão d
  11. Olá, Estou com o seguinte problema, uma tabela da minha base de dados corrompeu. Consegui criar um script com os dados, mas preciso deletar a tabela para depois cria-la e inserir os dados novamente. Mas aparece a seguinte mensagem de erro Unsuccessful execution caused by a system error that precludes successful execution of subsequent statements. database file appears corrupt (). bad checksum. checksum error on database page 15565. tentei dropar por script e clicando na table tambem... mas não deu certo. alguém poderia me ajudar
  12. OK.. resolvido usei a formula que postei neste post (que você mesmo respondeu) http://scriptbrasil.com.br/forum/index.php...mp;#entry612385 e apliquei na variável Resposta (string que vem da porta serial) do componente, tratei esta string e extrai o peso no formato correto. obrigado
  13. Tenho um pequeno script em clipper e quero passa-lo para o Delphi peso := val(substr(m->str_,at(" ",m->str_),11)) Converti da seguinte forma peso := StrToFloat(Copy(m = str_, pos(' ',m = str_),11)); mas dá erro ao compilar. alguém pode traduzir este código corretamente para mim? Obrigado
×
×
  • Create New...