[delphi-br] Suporte Tecnico via acesso remoto
Gostaria de saber se alguem cobra algum valor adicional dos clientes pelo suporte tecnico via acesso remoto ( tipo TeamViewer, LogMeIn, VNC, etc... ) ou se estes serviços são considerados como se fossem via e-mail, MSN, Skype, telefone, etc ( que geralmente tem uma taxa fixa mensal ou anual )... A minha dúvida é, se realizo ou não o suporte técnico através desta modalidade ( uma vez que estou acessando o computador de outra pessoa ) e caso realize, se deve ser cobrado como visita técnica, ou simplesmente como atendimento via telefone ou correio eletronico. Abraços Mario Hardt [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: delphi-br-ow...@yahoogrupos.com.br 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: delphi-br-unsubscr...@yahoogrupos.com.br * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Res:Re: Comp3 do Cobol para Numero
Tá aí, Leandro,
Para transformar um campo Comp3 do COBOL em Integer do Pascal:
Neste exemplo o campo hexa 09 17 20 14 0C foi convertido para 091720140
var
Registro, CodigoCobol, CodigoDelphi: string;
I, J, K, L: integer;
F: file;
Buf: array[0..79] of char;
begin
AssignFile(F,'C:\ArquivoCobol.arq');
Reset(F,1);
BlockRead(F,Buf,SizeOf(Buf),NumRead);
Registro := StrPas(Buf);
while NumRead 0 do
begin
CodigoDelphi := '';
for I := 0 to 4 do // Neste caso estou convertendo 5 caracteres
begin
CodigoCobol := Copy(Registro,1 + I,1); // Pega 1 byte de cada vez
if CodigoCobol = '' then // É o caso do código $00
CodigoDelphi := CodigoDelphi + '00'
Else
Begin
J := Ord(CodigoCobol[1]); // Acha o valor decimal do caracter
correspondente
K := Trunc(J / 16);
L := J mod 16;
if (L = 12) or
(L = 13) or
(L = 15) then // É o caso do código $0C (Sinal Positivo),
$0D (Sinal Negativo) ou $0F (Sem Sinal)
CodigoDelphi := CodigoDelphi + IntToStr(K)
Else
CodigoDelphi := CodigoDelphi + Format('%2.2d',[(K * 10) + L]);
end;
end;
BlockRead(F,Buf,SizeOf(Buf),NumRead);
Registro := StrPas(Buf);
end;
CloseFile(F);
Abraços
Mario Hardt
Blumenau-SC
- Original Message -
From: Leandro
To: delphi-br@yahoogrupos.com.br
Sent: Tuesday, June 19, 2007 2:24 PM
Subject: [delphi-br] Comp3 do Cobol para Numero
Bom dia,
Alguem tem alguma função Delphi que converte valor compactado do Cobol para
valor numerico?
Gerei txt´s das tabelas para importar no meu sistema, mas alguns campos estao
compactados.
Obrigado,
Leandro
[As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Re: Função que lista os subdiretórios de um diretó rio
O componente TShellTreeView não se encontra mais na paleta Samples no Delphi 2005 / 2006, somente até o D7. Eu usava este componente e tive que mudar a programação porque não o encontrei mais. Se alguém conseguiu encontrar ou sabe como resolver, agradeço pela dica. Mario H. Mensagem: 2 Data: Sat, 14 Oct 2006 12:52:04 -0300 De: ME [EMAIL PROTECTED] Assunto: Re: Função que lista os subdiretórios de um diretório Oi Willer Não sei se é isso que voce deseja, mas de uma olha no componente ShellTreeView da paleta Samples. Marô - Original Message - From: WILLER To: delphi-br@yahoogrupos.com.br Sent: Friday, October 13, 2006 4:09 PM Subject: [delphi-br] Função que lista os subdiretórios de um diretório Alguém sabe de alguma função ou componente que retorna uma lista dos subdiretórios de um diretório? Pesquisei no Help do Delphi, mas não achei. [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
