[delphi-br] PATH da Database no BDE
Srs Como fui direto pro SQLServer sem passar pelo BDE, pintou uma dúvida cruel aqui: Estou alocado numa empresa que precisa instalar um sistema antigo em Paradox em 2 micros. (micro A e micro B) Pelo pouco que sei, tenho que ir no BDEAdministrator no Painel de Controle e incluir uma nova Database, correto ? Porém a dúvida é a seguinte: -Esse sistema antigo não é client/server, porém deverá ficar instalado nos dois micros, A e B -Vamos dizer que o B vai acessar os dados do A, então, no PATH da nova Database o que eu coloco no B ? No micro A acredito que o PATH será C:\SISTEMA. E no micro B ? Por acaso tenho que colocar a letra da unidade do Servidor da rede ? E outra: Os sistemas feitos em Paradox já são naturamente para multi-usuários ? Muito obrigado antecipadamente para quem conseguir me ajudar. Obrigado Junior [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] PATH da Database no BDE
Júnior, tenta essa dica...pra mim funciona normal, em uma rede de 5 máquinas (rede local) Arquivos Paradox podem ser compartilhados em rede. Para que isto ocorra devemos: dicionar o DATABASE ENGINE CONFIGURATION (BDE CONFIG) Selecionar a página DRIVERS Selecionar o driver PARADOX e alterar o parâmetro NET DIR para o local onde serão gravados os arquivos de controle para compartilhamento. Por exemplo, G:\MEUAPLIC, onde G : corresponde ao drive de rede e MEUAPLIC, o diretório aonde está o aplicativo (executável) Depois selecionar a página SYSTEM Alterar o parâmetro LOCAL SHARE para TRUE. Após isto o BDE controlará o compartilhamento de arquivos PARADOX em rede. Red Mosquito escreveu: Srs Como fui direto pro SQLServer sem passar pelo BDE, pintou uma dúvida cruel aqui: Estou alocado numa empresa que precisa instalar um sistema antigo em Paradox em 2 micros. (micro A e micro B) Pelo pouco que sei, tenho que ir no BDEAdministrator no Painel de Controle e incluir uma nova Database, correto ? Porém a dúvida é a seguinte: -Esse sistema antigo não é client/server, porém deverá ficar instalado nos dois micros, A e B -Vamos dizer que o B vai acessar os dados do A, então, no PATH da nova Database o que eu coloco no B ? No micro A acredito que o PATH será C:\SISTEMA. E no micro B ? Por acaso tenho que colocar a letra da unidade do Servidor da rede ? E outra: Os sistemas feitos em Paradox já são naturamente para multi-usuários ? Muito obrigado antecipadamente para quem conseguir me ajudar. Obrigado Junior [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Path para o Bug do Delphi 2007 Update 3
Olá pessoal, para quem atualizou seu Delphi 2007 para o Update 3 e se deparou com o Bug onde o Menu de Contexto de alguns componentes não é exibido, certamente uma solução rápida está aqui http://andy.jgknet.de/blog/archives/69-Inofficial-RAD-Studio-patch.html. -- ... Eduardo Silva dos Santos DRD Sistemas. (27) 3218-4201 MSN: [EMAIL PROTECTED] Site: http://www.drdsistemas.com/ ... [As partes desta mensagem que não continham texto foram removidas]
RE: [delphi-br] Path para o Bug do Delphi 2007 Update 3
Isso é um workaround, estamos trabalhando em um update que irá corrigir isso oficialmente From: delphi-br@yahoogrupos.com.br on behalf of Eduardo Silva dos Santos Sent: Mon 17-Sep-07 16:39 To: delphi-br@yahoogrupos.com.br Subject: [delphi-br] Path para o Bug do Delphi 2007 Update 3 Olá pessoal, para quem atualizou seu Delphi 2007 para o Update 3 e se deparou com o Bug onde o Menu de Contexto de alguns componentes não é exibido, certamente uma solução rápida está aqui http://andy.jgknet.de/blog/archives/69-Inofficial-RAD-Studio-patch.html. http://andy.jgknet.de/blog/archives/69-Inofficial-RAD-Studio-patch.html. -- ... Eduardo Silva dos Santos DRD Sistemas. (27) 3218-4201 MSN: [EMAIL PROTECTED] mailto:eduardo.drd%40gmail.com Site: http://www.drdsistemas.com/ http://www.drdsistemas.com/ ... [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Path para o Bug do Delphi 2007 Update 3
Certamente Andreano, estamos satisfeitos com o trabalho que a CodeGear vem fazendo, o problema é o usuário final que fica ligando todo dia pra perguntar do Menu... heheheh o path ja resolve de imediato. Estamos aguardando ansiosos por mais um update.. grande abraço. Em 17/09/07, Andreano Lanusse [EMAIL PROTECTED] escreveu: Isso é um workaround, estamos trabalhando em um update que irá corrigir isso oficialmente From: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br on behalf of Eduardo Silva dos Santos Sent: Mon 17-Sep-07 16:39 To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br Subject: [delphi-br] Path para o Bug do Delphi 2007 Update 3 Olá pessoal, para quem atualizou seu Delphi 2007 para o Update 3 e se deparou com o Bug onde o Menu de Contexto de alguns componentes não é exibido, certamente uma solução rápida está aqui http://andy.jgknet.de/blog/archives/69-Inofficial-RAD-Studio-patch.html. http://andy.jgknet.de/blog/archives/69-Inofficial-RAD-Studio-patch.html. -- ... Eduardo Silva dos Santos DRD Sistemas. (27) 3218-4201 MSN: [EMAIL PROTECTED] eduardo.drd%40gmail.com mailto:eduardo.drd%40gmail.com Site: http://www.drdsistemas.com/ http://www.drdsistemas.com/ ... [As partes desta mensagem que não continham texto foram removidas] -- ... Eduardo Silva dos Santos DRD Sistemas. (27) 3218-4201 MSN: [EMAIL PROTECTED] Site: http://www.drdsistemas.com/ ... [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Path para o Bug do Delphi 2007 Update 3
Eduardo Silva dos Santos wrote: Olá pessoal, para quem atualizou seu Delphi 2007 para o Update 3 e se deparou com o Bug onde o Menu de Contexto de alguns componentes não é exibido, certamente uma solução rápida está aqui http://andy.jgknet.de/blog/archives/69-Inofficial-RAD-Studio-patch.html. Esse é o mesmo camarada que criou uma forma de usar generics em Delphi win32, que bolou uma forma da IDE ser carregada em menos tempo, isto só do que eu vi. Ele é mais rápido do que a CG e nem tem os fontes do Delphi. Impressionante. -- Joao Morais
Re: [delphi-br] Path para o Bug do Delphi 2007 Update 3
Olá João, realmente, o Andreas é ninja,, heheheh para quem quiser saber mais http://andy.jgknet.de/blog/ http://andy.jgknet.de/dspeedup/ http://andy.jgknet.de/dspeedup/builds/ Em 17/09/07, Joao Morais [EMAIL PROTECTED] escreveu: Eduardo Silva dos Santos wrote: Olá pessoal, para quem atualizou seu Delphi 2007 para o Update 3 e se deparou com o Bug onde o Menu de Contexto de alguns componentes não é exibido, certamente uma solução rápida está aqui http://andy.jgknet.de/blog/archives/69-Inofficial-RAD-Studio-patch.html. Esse é o mesmo camarada que criou uma forma de usar generics em Delphi win32, que bolou uma forma da IDE ser carregada em menos tempo, isto só do que eu vi. Ele é mais rápido do que a CG e nem tem os fontes do Delphi. Impressionante. -- Joao Morais -- ... Eduardo Silva dos Santos DRD Sistemas. (27) 3218-4201 MSN: [EMAIL PROTECTED] Site: http://www.drdsistemas.com/ ... [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Path PDOXUSRS.LCK
Bom Dia!!! Eu procurei no Google e nao encontrei uma solucao pro meu problema, eu tenho um sistema com BD Sql Server em q acesso via BDE (usando driver tb o ODBC do Win). estou tenho um problema (que acontece somente qdo o usuario do windows nao é o ADM, nao tem permissoes em várias pastas dos PC), da o erro: Directory is controlled by other .NET file Directory C:\ File: \\SERVIDOR\PASTA_PROGRAMA\PDOXUSRS.LCK O programa/BDE realmente cria este arquivo mesmo nao usando Paradox? E como faço pra redirecionar o local dele? (jogar para criar na mesma pasta do sistema) mto obrigado Rafael [As partes desta mensagem que não continham texto foram removidas]
Res: [delphi-br] Path PDOXUSRS.LCK
Vai na aba Configuration - Drivers - Native- Paradox e coloque o caminho no
NET Dir
GYNCOWBOY
André Luis da Silveira
- Mensagem original
De: Rafael Marques [EMAIL PROTECTED]
Para: delphi-br@yahoogrupos.com.br
Enviadas: Quinta-feira, 6 de Setembro de 2007 8:10:07
Assunto: [delphi-br] Path PDOXUSRS.LCK
Bom Dia!!!
Eu procurei no Google e nao encontrei uma solucao pro meu problema, eu tenho um
sistema com BD Sql Server em q acesso via BDE (usando driver tb o ODBC do Win).
estou tenho um problema (que acontece somente qdo o usuario do windows nao é o
ADM, nao tem permissoes em várias pastas dos PC), da o erro:
Directory is controlled by other .NET file
Directory C:\
File: \\SERVIDOR\PASTA_ PROGRAMA\ PDOXUSRS. LCK
O programa/BDE realmente cria este arquivo mesmo nao usando Paradox? E como
faço pra redirecionar o local dele? (jogar para criar na mesma pasta do sistema)
mto obrigado
Rafael
[As partes desta mensagem que não continham texto foram removidas]
!--
#ygrp-mkp{
border:1px solid #d8d8d8;font-family:Arial;margin:14px 0px;padding:0px 14px;}
#ygrp-mkp hr{
border:1px solid #d8d8d8;}
#ygrp-mkp #hd{
color:#628c2a;font-size:85%;font-weight:bold;line-height:122%;margin:10px 0px;}
#ygrp-mkp #ads{
margin-bottom:10px;}
#ygrp-mkp .ad{
padding:0 0;}
#ygrp-mkp .ad a{
color:#ff;text-decoration:none;}
--
!--
#ygrp-sponsor #ygrp-lc{
font-family:Arial;}
#ygrp-sponsor #ygrp-lc #hd{
margin:10px 0px;font-weight:bold;font-size:78%;line-height:122%;}
#ygrp-sponsor #ygrp-lc .ad{
margin-bottom:10px;padding:0 0;}
--
!--
#ygrp-mlmsg {font-size:13px;font-family:arial, helvetica, clean, sans-serif;}
#ygrp-mlmsg table {font-size:inherit;font:100%;}
#ygrp-mlmsg select, input, textarea {font:99% arial, helvetica, clean,
sans-serif;}
#ygrp-mlmsg pre, code {font:115% monospace;}
#ygrp-mlmsg * {line-height:1.22em;}
#ygrp-text{
font-family:Georgia;
}
#ygrp-text p{
margin:0 0 1em 0;}
#ygrp-tpmsgs{
font-family:Arial;
clear:both;}
#ygrp-vitnav{
padding-top:10px;font-family:Verdana;font-size:77%;margin:0;}
#ygrp-vitnav a{
padding:0 1px;}
#ygrp-actbar{
clear:both;margin:25px 0;white-space:nowrap;color:#666;text-align:right;}
#ygrp-actbar .left{
float:left;white-space:nowrap;}
.bld{font-weight:bold;}
#ygrp-grft{
font-family:Verdana;font-size:77%;padding:15px 0;}
#ygrp-ft{
font-family:verdana;font-size:77%;border-top:1px solid #666;
padding:5px 0;
}
#ygrp-mlmsg #logo{
padding-bottom:10px;}
#ygrp-vital{
background-color:#e0ecee;margin-bottom:20px;padding:2px 0 8px 8px;}
#ygrp-vital #vithd{
font-size:77%;font-family:Verdana;font-weight:bold;color:#333;text-transform:uppercase;}
#ygrp-vital ul{
padding:0;margin:2px 0;}
#ygrp-vital ul li{
list-style-type:none;clear:both;border:1px solid #e0ecee;
}
#ygrp-vital ul li .ct{
font-weight:bold;color:#ff7900;float:right;width:2em;text-align:right;padding-right:.5em;}
#ygrp-vital ul li .cat{
font-weight:bold;}
#ygrp-vital a{
text-decoration:none;}
#ygrp-vital a:hover{
text-decoration:underline;}
#ygrp-sponsor #hd{
color:#999;font-size:77%;}
#ygrp-sponsor #ov{
padding:6px 13px;background-color:#e0ecee;margin-bottom:20px;}
#ygrp-sponsor #ov ul{
padding:0 0 0 8px;margin:0;}
#ygrp-sponsor #ov li{
list-style-type:square;padding:6px 0;font-size:77%;}
#ygrp-sponsor #ov li a{
text-decoration:none;font-size:130%;}
#ygrp-sponsor #nc{
background-color:#eee;margin-bottom:20px;padding:0 8px;}
#ygrp-sponsor .ad{
padding:8px 0;}
#ygrp-sponsor .ad #hd1{
font-family:Arial;font-weight:bold;color:#628c2a;font-size:100%;line-height:122%;}
#ygrp-sponsor .ad a{
text-decoration:none;}
#ygrp-sponsor .ad a:hover{
text-decoration:underline;}
#ygrp-sponsor .ad p{
margin:0;}
o{font-size:0;}
.MsoNormal{
margin:0 0 0 0;}
#ygrp-text tt{
font-size:120%;}
blockquote{margin:0 0 0 4px;}
.replbq{margin:4;}
--
Flickr agora em português. Você clica, todo mundo vê.
http://www.flickr.com.br/
[As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Path PDOXUSRS.LCK
eu gostaria de fazer via comando, porque aí n precisaria d ir em todos os PCs e
alterar, entao ja ficaria algo legal
- Original Message -
From: Andre Luis Silveria
To: delphi-br@yahoogrupos.com.br
Sent: Thursday, September 06, 2007 8:50 AM
Subject: Res: [delphi-br] Path PDOXUSRS.LCK
Vai na aba Configuration - Drivers - Native- Paradox e coloque o caminho
no NET Dir
GYNCOWBOY
André Luis da Silveira
- Mensagem original
De: Rafael Marques [EMAIL PROTECTED]
Para: delphi-br@yahoogrupos.com.br
Enviadas: Quinta-feira, 6 de Setembro de 2007 8:10:07
Assunto: [delphi-br] Path PDOXUSRS.LCK
Bom Dia!!!
Eu procurei no Google e nao encontrei uma solucao pro meu problema, eu tenho
um sistema com BD Sql Server em q acesso via BDE (usando driver tb o ODBC do
Win).
estou tenho um problema (que acontece somente qdo o usuario do windows nao é
o ADM, nao tem permissoes em várias pastas dos PC), da o erro:
Directory is controlled by other .NET file
Directory C:\
File: \\SERVIDOR\PASTA_ PROGRAMA\ PDOXUSRS. LCK
O programa/BDE realmente cria este arquivo mesmo nao usando Paradox? E como
faço pra redirecionar o local dele? (jogar para criar na mesma pasta do sistema)
mto obrigado
Rafael
[As partes desta mensagem que não continham texto foram removidas]
!--
#ygrp-mkp{
border:1px solid #d8d8d8;font-family:Arial;margin:14px 0px;padding:0px 14px;}
#ygrp-mkp hr{
border:1px solid #d8d8d8;}
#ygrp-mkp #hd{
color:#628c2a;font-size:85%;font-weight:bold;line-height:122%;margin:10px
0px;}
#ygrp-mkp #ads{
margin-bottom:10px;}
#ygrp-mkp .ad{
padding:0 0;}
#ygrp-mkp .ad a{
color:#ff;text-decoration:none;}
--
!--
#ygrp-sponsor #ygrp-lc{
font-family:Arial;}
#ygrp-sponsor #ygrp-lc #hd{
margin:10px 0px;font-weight:bold;font-size:78%;line-height:122%;}
#ygrp-sponsor #ygrp-lc .ad{
margin-bottom:10px;padding:0 0;}
--
!--
#ygrp-mlmsg {font-size:13px;font-family:arial, helvetica, clean, sans-serif;}
#ygrp-mlmsg table {font-size:inherit;font:100%;}
#ygrp-mlmsg select, input, textarea {font:99% arial, helvetica, clean,
sans-serif;}
#ygrp-mlmsg pre, code {font:115% monospace;}
#ygrp-mlmsg * {line-height:1.22em;}
#ygrp-text{
font-family:Georgia;
}
#ygrp-text p{
margin:0 0 1em 0;}
#ygrp-tpmsgs{
font-family:Arial;
clear:both;}
#ygrp-vitnav{
padding-top:10px;font-family:Verdana;font-size:77%;margin:0;}
#ygrp-vitnav a{
padding:0 1px;}
#ygrp-actbar{
clear:both;margin:25px 0;white-space:nowrap;color:#666;text-align:right;}
#ygrp-actbar .left{
float:left;white-space:nowrap;}
.bld{font-weight:bold;}
#ygrp-grft{
font-family:Verdana;font-size:77%;padding:15px 0;}
#ygrp-ft{
font-family:verdana;font-size:77%;border-top:1px solid #666;
padding:5px 0;
}
#ygrp-mlmsg #logo{
padding-bottom:10px;}
#ygrp-vital{
background-color:#e0ecee;margin-bottom:20px;padding:2px 0 8px 8px;}
#ygrp-vital #vithd{
font-size:77%;font-family:Verdana;font-weight:bold;color:#333;text-transform:uppercase;}
#ygrp-vital ul{
padding:0;margin:2px 0;}
#ygrp-vital ul li{
list-style-type:none;clear:both;border:1px solid #e0ecee;
}
#ygrp-vital ul li .ct{
font-weight:bold;color:#ff7900;float:right;width:2em;text-align:right;padding-right:.5em;}
#ygrp-vital ul li .cat{
font-weight:bold;}
#ygrp-vital a{
text-decoration:none;}
#ygrp-vital a:hover{
text-decoration:underline;}
#ygrp-sponsor #hd{
color:#999;font-size:77%;}
#ygrp-sponsor #ov{
padding:6px 13px;background-color:#e0ecee;margin-bottom:20px;}
#ygrp-sponsor #ov ul{
padding:0 0 0 8px;margin:0;}
#ygrp-sponsor #ov li{
list-style-type:square;padding:6px 0;font-size:77%;}
#ygrp-sponsor #ov li a{
text-decoration:none;font-size:130%;}
#ygrp-sponsor #nc{
background-color:#eee;margin-bottom:20px;padding:0 8px;}
#ygrp-sponsor .ad{
padding:8px 0;}
#ygrp-sponsor .ad #hd1{
font-family:Arial;font-weight:bold;color:#628c2a;font-size:100%;line-height:122%;}
#ygrp-sponsor .ad a{
text-decoration:none;}
#ygrp-sponsor .ad a:hover{
text-decoration:underline;}
#ygrp-sponsor .ad p{
margin:0;}
o{font-size:0;}
.MsoNormal{
margin:0 0 0 0;}
#ygrp-text tt{
font-size:120%;}
blockquote{margin:0 0 0 4px;}
.replbq{margin:4;}
--
Flickr agora em português. Você clica, todo mundo vê.
http://www.flickr.com.br/
[As partes desta mensagem que não continham texto foram removidas]
--
Esta mensagem foi verificada pelo E-mail Protegido Terra.
Scan engine: McAfee VirusScan / Atualizado em 05/09/2007 / Versão: 5.1.00/5113
Proteja o seu e-mail Terra: http://mail.terra.com.br/
[As partes desta mensagem que não continham texto foram removidas]
Res: [delphi-br] Path PDOXUSRS.LCK
Direto da DTDelphi 2.8:
uses BDE; // não
esqueça de incluir esta unit
// ChangeNetDir
procedure ChangeNetDir(Drive: Char);
var
hCur: hDBICur;
Config: CFGDesc;
Cont: Boolean;
begin
if DbiInit(nil) = DBIERR_NONE then
begin
hCur := nil;
if DbiOpenCfgInfoList(nil, dbiREADWRITE,
cfgPersistent,
'\DRIVERS\PARADOX\INIT', hCur) = DBIERR_NONE then
begin
if DbiSetToBegin(hCur) = DBIERR_NONE then
begin
Cont := True;
while Cont do
begin
if (DbiGetNextRecord(hCur, dbiWRITELOCK, @Config,
nil)
DBIERR_NONE) then
Cont := False
else if StrIComp(Config.szNodeName, 'NET DIR') = 0
then
begin
StrPCopy(Config.szValue, Drive + ':\');
DbiModifyRecord(hCur, @Config, True);
Cont := False
end;
end;
end;
end;
DbiExit();
end;
end;
O uso deste procedimento pode ser assim:
procedure TForm1.Button1Click(Sender: TObject);
begin
ChangeNetDir('H');
end;
GYNCOWBOY
André Luis da Silveira
- Mensagem original
De: Rafael Marques [EMAIL PROTECTED]
Para: delphi-br@yahoogrupos.com.br
Enviadas: Quinta-feira, 6 de Setembro de 2007 9:09:07
Assunto: Re: [delphi-br] Path PDOXUSRS.LCK
eu gostaria de fazer via comando, porque aí n precisaria d ir em
todos os PCs e alterar, entao ja ficaria algo legal
- Original Message -
From: Andre Luis Silveria
To: [EMAIL PROTECTED] os.com.br
Sent: Thursday, September 06, 2007 8:50 AM
Subject: Res: [delphi-br] Path PDOXUSRS.LCK
Vai na aba Configuration - Drivers - Native- Paradox e coloque o caminho no
NET Dir
GYNCOWBOY
André Luis da Silveira
- Mensagem original
De: Rafael Marques rafael.matriz@ terra.com. br
Para: [EMAIL PROTECTED] os.com.br
Enviadas: Quinta-feira, 6 de Setembro de 2007 8:10:07
Assunto: [delphi-br] Path PDOXUSRS.LCK
Bom Dia!!!
Eu procurei no Google e nao encontrei uma solucao pro meu problema, eu tenho um
sistema com BD Sql Server em q acesso via BDE (usando driver tb o ODBC do Win).
estou tenho um problema (que acontece somente qdo o usuario do windows nao é o
ADM, nao tem permissoes em várias pastas dos PC), da o erro:
Directory is controlled by other .NET file
Directory C:\
File: \\SERVIDOR\PASTA_ PROGRAMA\ PDOXUSRS. LCK
O programa/BDE realmente cria este arquivo mesmo nao usando Paradox? E como
faço pra redirecionar o local dele? (jogar para criar na mesma pasta do sistema)
mto obrigado
Rafael
[As partes desta mensagem que não continham texto foram removidas]
!--
#ygrp-mkp{
border:1px solid #d8d8d8;font- family:Arial; margin:14px 0px;padding: 0px
14px;}
#ygrp-mkp hr{
border:1px solid #d8d8d8;}
#ygrp-mkp #hd{
color:#628c2a; font-size: 85%;font- weight:bold; line-height: 122%;margin:
10px 0px;}
#ygrp-mkp #ads{
margin-bottom: 10px;}
#ygrp-mkp .ad{
padding:0 0;}
#ygrp-mkp .ad a{
color:#ff; text-decoration: none;}
--
!--
#ygrp-sponsor #ygrp-lc{
font-family: Arial;}
#ygrp-sponsor #ygrp-lc #hd{
margin:10px 0px;font-weight: bold;font- size:78%; line-height: 122%;}
#ygrp-sponsor #ygrp-lc .ad{
margin-bottom: 10px;padding: 0 0;}
--
!--
#ygrp-mlmsg {font-size:13px; font-family: arial, helvetica, clean, sans-serif;}
#ygrp-mlmsg table {font-size:inherit; font:100% ;}
#ygrp-mlmsg select, input, textarea {font:99% arial, helvetica, clean,
sans-serif;}
#ygrp-mlmsg pre, code {font:115% monospace;}
#ygrp-mlmsg * {line-height: 1.22em;}
#ygrp-text{
font-family: Georgia;
}
#ygrp-text p{
margin:0 0 1em 0;}
#ygrp-tpmsgs{
font-family: Arial;
clear:both;}
#ygrp-vitnav{
padding-top: 10px;font- family:Verdana; font-size: 77%;margin: 0;}
#ygrp-vitnav a{
padding:0 1px;}
#ygrp-actbar{
clear:both;margin: 25px 0;white-space: nowrap;color: #666;text- align:right; }
#ygrp-actbar .left{
float:left;white- space:nowrap; }
.bld{font-weight: bold;}
#ygrp-grft{
font-family: Verdana;font- size:77%; padding:15px 0;}
#ygrp-ft{
font-family: verdana;font- size:77%; border-top: 1px solid #666;
padding:5px 0;
}
#ygrp-mlmsg #logo{
padding-bottom: 10px;}
#ygrp-vital{
background-color: #e0ecee;margin- bottom:20px; padding:2px 0 8px 8px;}
#ygrp-vital #vithd{
font-size:77% ;font-family: Verdana;font- weight:bold; color:#333;
text-transform: uppercase; }
#ygrp-vital ul{
padding:0;margin: 2px 0;}
#ygrp-vital ul li{
list-style-type: none;clear: both;border: 1px solid #e0ecee;
}
#ygrp-vital ul li .ct{
font-weight: bold;color: #ff7900;float: right;width: 2em;text- align:right;
padding-right: .5em;}
#ygrp-vital ul li .cat{
font-weight: bold;}
#ygrp-vital a{
text-decoration: none;}
#ygrp-vital a:hover{
text-decoration: underline; }
#ygrp-sponsor #hd{
color:#999;font- size:77%; }
#ygrp-sponsor #ov{
padding:6px 13px;background- color:#e0ecee; margin-bottom: 20px;}
#ygrp-sponsor #ov ul{
padding:0 0 0 8px;margin:0
Re: [delphi-br] Path PDOXUSRS.LCK
Vc no BDE de cada máquina cliente, esta apontando para um IDAPI32.cfg único que esta no servidor? Ou então, tem que configurar cada máquina. O primeiro caso é melhor. tem que ter uma pasta comum para o NETDIR Assim a 'seco' é o que posso te ajudar. Roberto Wazen Mensagem Original: Data: 08:10:07 06/09/2007 De: Rafael Marques [EMAIL PROTECTED] Assunto: [delphi-br] Path PDOXUSRS.LCK Bom Dia!!! Eu procurei no Google e nao encontrei uma solucao pro meu problema, eu tenho um sistema com BD Sql Server em q acesso via BDE (usando driver tb o ODBC do Win). estou tenho um problema (que acontece somente qdo o usuario do windows nao é o ADM, nao tem permissoes em várias pastas dos PC), da o erro: Directory is controlled by other .NET file Directory C:\ File: \\SERVIDOR\PASTA_PROGRAMA\PDOXUSRS.LCK O programa/BDE realmente cria este arquivo mesmo nao usando Paradox? E como faço pra redirecionar o local dele? (jogar para criar na mesma pasta do sistema) mto obrigado Rafael [As partes desta mensagem que não continham texto foram removidas] Aqui na Oi Internet você ganha ou ganha. Além de acesso grátis com qualidade, ganha contas ilimitadas de email com 1 giga cada uma. Ganha espaço ilimitado para hospedar sua página pessoal. Ganha flog, suporte grátis e muito mais. Baixe grátis o Discador em http://www.oi.com.br/discador e comece a ganhar. Agora, se o seu negócio é voar na internet sem pagar uma fortuna, assine Oi Internet banda larga e ganhe modem grátis. Clique em http://www.oi.com.br/bandalarga e aproveite essa moleza!
Re: [delphi-br] Path PDOXUSRS.LCK
valeu Andre!!
eu tenho a DTDelphi 2.8 e vi esta dica lá, mas nao sabia se era pra o q estou
querendo
mto obrigado!
Rafael
- Original Message -
From: Andre Luis Silveria
To: delphi-br@yahoogrupos.com.br
Sent: Thursday, September 06, 2007 9:35 AM
Subject: Res: [delphi-br] Path PDOXUSRS.LCK
Direto da DTDelphi 2.8:
uses BDE; // não
esqueça de incluir esta unit
// ChangeNetDir
procedure ChangeNetDir(Drive: Char);
var
hCur: hDBICur;
Config: CFGDesc;
Cont: Boolean;
begin
if DbiInit(nil) = DBIERR_NONE then
begin
hCur := nil;
if DbiOpenCfgInfoList(nil, dbiREADWRITE,
cfgPersistent,
'\DRIVERS\PARADOX\INIT', hCur) = DBIERR_NONE then
begin
if DbiSetToBegin(hCur) = DBIERR_NONE then
begin
Cont := True;
while Cont do
begin
if (DbiGetNextRecord(hCur, dbiWRITELOCK, @Config,
nil)
DBIERR_NONE) then
Cont := False
else if StrIComp(Config.szNodeName, 'NET DIR') = 0
then
begin
StrPCopy(Config.szValue, Drive + ':\');
DbiModifyRecord(hCur, @Config, True);
Cont := False
end;
end;
end;
end;
DbiExit();
end;
end;
O uso deste procedimento pode ser assim:
procedure TForm1.Button1Click(Sender: TObject);
begin
ChangeNetDir('H');
end;
GYNCOWBOY
André Luis da Silveira
- Mensagem original
De: Rafael Marques [EMAIL PROTECTED]
Para: delphi-br@yahoogrupos.com.br
Enviadas: Quinta-feira, 6 de Setembro de 2007 9:09:07
Assunto: Re: [delphi-br] Path PDOXUSRS.LCK
eu gostaria de fazer via comando, porque aí n precisaria d ir em todos os PCs
e alterar, entao ja ficaria algo legal
- Original Message -
From: Andre Luis Silveria
To: [EMAIL PROTECTED] os.com.br
Sent: Thursday, September 06, 2007 8:50 AM
Subject: Res: [delphi-br] Path PDOXUSRS.LCK
Vai na aba Configuration - Drivers - Native- Paradox e coloque o caminho
no NET Dir
GYNCOWBOY
André Luis da Silveira
- Mensagem original
De: Rafael Marques rafael.matriz@ terra.com. br
Para: [EMAIL PROTECTED] os.com.br
Enviadas: Quinta-feira, 6 de Setembro de 2007 8:10:07
Assunto: [delphi-br] Path PDOXUSRS.LCK
Bom Dia!!!
Eu procurei no Google e nao encontrei uma solucao pro meu problema, eu tenho
um sistema com BD Sql Server em q acesso via BDE (usando driver tb o ODBC do
Win).
estou tenho um problema (que acontece somente qdo o usuario do windows nao é
o ADM, nao tem permissoes em várias pastas dos PC), da o erro:
Directory is controlled by other .NET file
Directory C:\
File: \\SERVIDOR\PASTA_ PROGRAMA\ PDOXUSRS. LCK
O programa/BDE realmente cria este arquivo mesmo nao usando Paradox? E como
faço pra redirecionar o local dele? (jogar para criar na mesma pasta do sistema)
mto obrigado
Rafael
[As partes desta mensagem que não continham texto foram removidas]
!--
#ygrp-mkp{
border:1px solid #d8d8d8;font- family:Arial; margin:14px 0px;padding: 0px
14px;}
#ygrp-mkp hr{
border:1px solid #d8d8d8;}
#ygrp-mkp #hd{
color:#628c2a; font-size: 85%;font- weight:bold; line-height: 122%;margin:
10px 0px;}
#ygrp-mkp #ads{
margin-bottom: 10px;}
#ygrp-mkp .ad{
padding:0 0;}
#ygrp-mkp .ad a{
color:#ff; text-decoration: none;}
--
!--
#ygrp-sponsor #ygrp-lc{
font-family: Arial;}
#ygrp-sponsor #ygrp-lc #hd{
margin:10px 0px;font-weight: bold;font- size:78%; line-height: 122%;}
#ygrp-sponsor #ygrp-lc .ad{
margin-bottom: 10px;padding: 0 0;}
--
!--
#ygrp-mlmsg {font-size:13px; font-family: arial, helvetica, clean,
sans-serif;}
#ygrp-mlmsg table {font-size:inherit; font:100% ;}
#ygrp-mlmsg select, input, textarea {font:99% arial, helvetica, clean,
sans-serif;}
#ygrp-mlmsg pre, code {font:115% monospace;}
#ygrp-mlmsg * {line-height: 1.22em;}
#ygrp-text{
font-family: Georgia;
}
#ygrp-text p{
margin:0 0 1em 0;}
#ygrp-tpmsgs{
font-family: Arial;
clear:both;}
#ygrp-vitnav{
padding-top: 10px;font- family:Verdana; font-size: 77%;margin: 0;}
#ygrp-vitnav a{
padding:0 1px;}
#ygrp-actbar{
clear:both;margin: 25px 0;white-space: nowrap;color: #666;text- align:right; }
#ygrp-actbar .left{
float:left;white- space:nowrap; }
.bld{font-weight: bold;}
#ygrp-grft{
font-family: Verdana;font- size:77%; padding:15px 0;}
#ygrp-ft{
font-family: verdana;font- size:77%; border-top: 1px solid #666;
padding:5px 0;
}
#ygrp-mlmsg #logo{
padding-bottom: 10px;}
#ygrp-vital{
background-color: #e0ecee;margin- bottom:20px; padding:2px 0 8px 8px;}
#ygrp-vital #vithd{
font-size:77% ;font-family: Verdana;font- weight:bold; color:#333;
text-transform: uppercase; }
#ygrp-vital ul{
padding:0;margin: 2px 0;}
#ygrp-vital ul li{
list-style-type: none;clear: both;border: 1px solid #e0ecee;
}
#ygrp-vital ul li .ct{
font-weight: bold;color: #ff7900;float: right;width: 2em;text- align:right;
padding-right: .5em;}
#ygrp-vital ul li
Re: [delphi-br] Path da DLL
function ApplicationName: string; var TheFileName: array[0..MAX_PATH] of char; begin FillChar(TheFileName, sizeof(TheFileName), #0); GetModuleFileName(hInstance, TheFileName, sizeof(TheFileName)); Result := TheFileName; end; - Original Message - From: Luis To: delphi-Br Sent: Wednesday, July 19, 2006 10:50 AM Subject: [delphi-br] Path da DLL Bom Dia, meu projeto é uma dll, roda junto ao hotsinc. so que estou estou querendo pega o path da dll, aonde ela é criado, como faço isso? obs uso essa rotina, mas eu sei q nao funciona pois meu projeto nao tem exe e sim um dll. ex: dir := ExtractFilePath(Application.ExeName); -- Grato pelo atenção Luís ___ Você quer respostas para suas perguntas? Ou você sabe muito e quer compartilhar seu conhecimento? Experimente o Yahoo! Respostas ! http://br.answers.yahoo.com/ [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] Path da DLL
Bom Dia, meu projeto é uma dll, roda junto ao hotsinc. so que estou estou querendo pega o path da dll, aonde ela é criado, como faço isso? obs uso essa rotina, mas eu sei q nao funciona pois meu projeto nao tem exe e sim um dll. ex: dir := ExtractFilePath(Application.ExeName); -- Grato pelo atenção Luís ___ Você quer respostas para suas perguntas? Ou você sabe muito e quer compartilhar seu conhecimento? Experimente o Yahoo! Respostas ! http://br.answers.yahoo.com/ -- 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] Path do Windows
Galera tem alguma função que acha o path aonde esta instalado o windows.? ex.: F:\windows\ -- Grato pelo atenção Luís ___ Novidade no Yahoo! Mail: receba alertas de novas mensagens no seu celular. Registre seu aparelho agora! http://br.mobile.yahoo.com/mailalertas/ -- 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] Path do Windows
Diretório de instalação do windows
function PegaSysDir: string;
var
MeuBuffer: Array [1..128] of Char;
retorno: Integer;
Begin
retorno:=GetSystemDirectory(@MeuBuffer,128);
if (retorno128) OR (retorno=0) then
PegaSysDir:=''
else
PegaSysDir:=StrPas(@MeuBuffer);
End; {prc}
- Original Message -
From: Luis [EMAIL PROTECTED]
To: Delphi-Br delphi-br@yahoogrupos.com.br
Sent: Thursday, July 06, 2006 3:05 PM
Subject: [delphi-br] Path do Windows
Galera tem alguma função que acha o path aonde esta instalado o windows.?
ex.: F:\windows\
--
Grato pelo atenção
Luís
___
Novidade no Yahoo! Mail: receba alertas de novas mensagens no seu celular.
Registre seu aparelho agora!
http://br.mobile.yahoo.com/mailalertas/
--
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
Re: [delphi-br] Path do Windows
var pc : array[0..100] of char; diretorio : string; begin GetWindowsDirectory(pc,144); diretorio := strpas(pc); end; - Original Message - From: Luis To: Delphi-Br Sent: Thursday, July 06, 2006 3:05 PM Subject: [delphi-br] Path do Windows Galera tem alguma função que acha o path aonde esta instalado o windows.? ex.: F:\windows\ -- Grato pelo atenção Luís ___ Novidade no Yahoo! Mail: receba alertas de novas mensagens no seu celular. Registre seu aparelho agora! http://br.mobile.yahoo.com/mailalertas/ __ Informação do NOD32 IMON 1.1646 (20060706) __ Esta mensagem foi verificada pelo NOD32 sistema antivírus http://www.eset.com.br [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
RES: [delphi-br] Path do Windows
Opa algumas melhorias: var Path: array [0..MAX_PATH-1] of char; Diretorio : String; begin GetWindowsDirectory(Path, SizeOf(Path)); Diretorio := Path; []'s Andreano Lanusse System Engineer - Development Tools http://info.borland.com.br/borcon Tel.: +55 (11) 2165 - 8000 / Mobile: +55 (11) 8196-5912 http://info.borland.com.br/borcon [EMAIL PROTECTED] - www.borland.com.br http://www.borland.com.br/ Blogs: http://blogs.borland.com/andreanolanusse Artigos: http://bdn.borland.com http://bdn.borland.com/ A Borland Software é líder mundial em soluções independentes de plataforma para a Criação Otimizada de Software (Software Delivery Optimization), auxiliando nossos clientes a transporem as barreiras atuais do desenvolvimento, para maximizar o valor do software para seu negócio. http://info.borland.com.br/delphitour2006 http://info.borland.com.br/delphi http://info.borland.com.br/delphitour http://info.borland.com.br/delphi De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Desenvolvimento (Anderson) Enviada em: quinta-feira, 6 de julho de 2006 16:22 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] Path do Windows var pc : array[0..100] of char; diretorio : string; begin GetWindowsDirectory(pc,144); diretorio := strpas(pc); end; - Original Message - From: Luis To: Delphi-Br Sent: Thursday, July 06, 2006 3:05 PM Subject: [delphi-br] Path do Windows Galera tem alguma função que acha o path aonde esta instalado o windows.? ex.: F:\windows\ -- Grato pelo atenção Luís ___ Novidade no Yahoo! Mail: receba alertas de novas mensagens no seu celular. Registre seu aparelho agora! http://br.mobile.yahoo.com/mailalertas/ __ Informação do NOD32 IMON 1.1646 (20060706) __ Esta mensagem foi verificada pelo NOD32 sistema antivírus http://www.eset.com.br [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
Re: [delphi-br] Path através de OpenDialog
Tente isso moça ExtractShortPathName(opendialog1.filename); att, Leandro - Original Message - From: Moked - Tamara (Brazil) To: delphi-br@yahoogrupos.com.br Sent: Tuesday, June 27, 2006 3:45 PM Subject: [delphi-br] Path através de OpenDialog http://www.moked.com.br/ Tamara Clemente - Suporte Técnico Moked do Brasil - Consultoria de Segurança Empresarial Divisão MokInf de Informática PABX: (55-11) 5071-2748 [EMAIL PROTECTED] www.moked.com.br http://www.moked.com.br/ Grau de Sigilo: Confidencial Reservado Interno Amplo Nível de Prioridade: Alto Médio Baixo Destinatário/s: Lista de divulgação - Boa Tarde, Pessoal, tem como fazer com q o path capturado através do opendiloag e acessado pelo opendialog.filename fique igual ao q se tem quando seta-se para True a opção ofoldstyledialog??? Exemplo: ofoldstyledialog:= false - C:\documents and settings\administrador\pasta\arquivo.txt ofoldstyledialog:= true - C:\docume~1\admini~1\pasta\arquiv~1.txt Ou seja, quero q seja exibido ao usuário a forma nova do opendiloag, porém preciso q o caminho seja dado da forma antiga... Obrigada, Tamara A Moked é a Única Empresa do ramo certificada pelo ISO9001:2000 Serviços prestados no Brasil na área de segurança pessoal e empresarial: Consultoria e Assessoria | Diagnósticos e Projetos | Curso e Treinamentos | Auditoria e Sindicância | Software de Gestão | Help-desk 24hs O emitente da mensagem é o responsável por seu conteúdo e divulgação, proibindo sua reprodução sem a prévia autorização do mesmo. Antes de imprimir pense em nosso compromisso com o Meio Ambiente e o comprometimento com os Custo envolvidos! [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] Path através de OpenDialog
http://www.moked.com.br/ Tamara Clemente - Suporte Técnico Moked do Brasil - Consultoria de Segurança Empresarial Divisão MokInf de Informática PABX: (55-11) 5071-2748 [EMAIL PROTECTED] www.moked.com.br http://www.moked.com.br/ Grau de Sigilo: Confidencial Reservado Interno Amplo Nível de Prioridade: Alto Médio Baixo Destinatário/s: Lista de divulgação - Boa Tarde, Pessoal, tem como fazer com q o path capturado através do opendiloag e acessado pelo opendialog.filename fique igual ao q se tem quando seta-se para True a opção ofoldstyledialog??? Exemplo: ofoldstyledialog:= false - C:\documents and settings\administrador\pasta\arquivo.txt ofoldstyledialog:= true - C:\docume~1\admini~1\pasta\arquiv~1.txt Ou seja, quero q seja exibido ao usuário a forma nova do opendiloag, porém preciso q o caminho seja dado da forma antiga... Obrigada, Tamara A Moked é a Única Empresa do ramo certificada pelo ISO9001:2000 Serviços prestados no Brasil na área de segurança pessoal e empresarial: Consultoria e Assessoria | Diagnósticos e Projetos | Curso e Treinamentos | Auditoria e Sindicância | Software de Gestão | Help-desk 24hs O emitente da mensagem é o responsável por seu conteúdo e divulgação, proibindo sua reprodução sem a prévia autorização do mesmo. Antes de imprimir pense em nosso compromisso com o Meio Ambiente e o comprometimento com os Custo envolvidos! [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] Path através de OpenDialog
Existe uma função que faz exatamente o q vc quer: function ExtractShortPathName(const FileName: string): string; Original Message - From: Moked - Tamara (Brazil) [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: Tuesday, June 27, 2006 3:45 PM Subject: [delphi-br] Path através de OpenDialog http://www.moked.com.br/ Tamara Clemente - Suporte Técnico Moked do Brasil - Consultoria de Segurança Empresarial Divisão MokInf de Informática PABX: (55-11) 5071-2748 [EMAIL PROTECTED] www.moked.com.br http://www.moked.com.br/ Grau de Sigilo: Confidencial Reservado Interno Amplo Nível de Prioridade: Alto Médio Baixo Destinatário/s: Lista de divulgação - Boa Tarde, Pessoal, tem como fazer com q o path capturado através do opendiloag e acessado pelo opendialog.filename fique igual ao q se tem quando seta-se para True a opção ofoldstyledialog??? Exemplo: ofoldstyledialog:= false - C:\documents and settings\administrador\pasta\arquivo.txt ofoldstyledialog:= true - C:\docume~1\admini~1\pasta\arquiv~1.txt Ou seja, quero q seja exibido ao usuário a forma nova do opendiloag, porém preciso q o caminho seja dado da forma antiga... Obrigada, Tamara A Moked é a Única Empresa do ramo certificada pelo ISO9001:2000 Serviços prestados no Brasil na área de segurança pessoal e empresarial: Consultoria e Assessoria | Diagnósticos e Projetos | Curso e Treinamentos | Auditoria e Sindicância | Software de Gestão | Help-desk 24hs O emitente da mensagem é o responsável por seu conteúdo e divulgação, proibindo sua reprodução sem a prévia autorização do mesmo. Antes de imprimir pense em nosso compromisso com o Meio Ambiente e o comprometimento com os Custo envolvidos! [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
Re: [delphi-br] Path através de OpenDialog
Existe uma função q faz exatamente o que você quer. function ExtractShortPathName(const FileName: string): string; Description ExtractShortPathName converts the file name, FileName, to the short 8.3 form. ExtractShortPathName returns an empty string if the file or directory does not exist. The first parameter, FileName, can be a full path name. For example, ExtractShortPathName would convert the full path name: C:\Program Files\Borland\Delphi\Bin\Delphi32.exe to the short form: C:\Progra~1\Borland\Delphi\Bin\Delphi32.exe - Original Message - From: Moked - Tamara (Brazil) [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: Tuesday, June 27, 2006 3:45 PM Subject: [delphi-br] Path através de OpenDialog http://www.moked.com.br/ Tamara Clemente - Suporte Técnico Moked do Brasil - Consultoria de Segurança Empresarial Divisão MokInf de Informática PABX: (55-11) 5071-2748 [EMAIL PROTECTED] www.moked.com.br http://www.moked.com.br/ Grau de Sigilo: Confidencial Reservado Interno Amplo Nível de Prioridade: Alto Médio Baixo Destinatário/s: Lista de divulgação - Boa Tarde, Pessoal, tem como fazer com q o path capturado através do opendiloag e acessado pelo opendialog.filename fique igual ao q se tem quando seta-se para True a opção ofoldstyledialog??? Exemplo: ofoldstyledialog:= false - C:\documents and settings\administrador\pasta\arquivo.txt ofoldstyledialog:= true - C:\docume~1\admini~1\pasta\arquiv~1.txt Ou seja, quero q seja exibido ao usuário a forma nova do opendiloag, porém preciso q o caminho seja dado da forma antiga... Obrigada, Tamara A Moked é a Única Empresa do ramo certificada pelo ISO9001:2000 Serviços prestados no Brasil na área de segurança pessoal e empresarial: Consultoria e Assessoria | Diagnósticos e Projetos | Curso e Treinamentos | Auditoria e Sindicância | Software de Gestão | Help-desk 24hs O emitente da mensagem é o responsável por seu conteúdo e divulgação, proibindo sua reprodução sem a prévia autorização do mesmo. Antes de imprimir pense em nosso compromisso com o Meio Ambiente e o comprometimento com os Custo envolvidos! [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
Re: [delphi-br] Path
procure na paleta win 3.11 - Original Message - From: Luciano [EMAIL PROTECTED] To: delphi [EMAIL PROTECTED] Sent: Thursday, September 30, 2004 2:36 PM Subject: [delphi-br] Path Existe algum componente que grave o caminho selecionado pelo usurio, ou seja, se o usurio selecionar caminho para um arquivo, este caminho ficar gravado independente de ainda estar no programa ou no Luciano Alves de Oliveira Programador Altec Solues em Informtica Ltda (19) 3542-3656 -- 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] ou [EMAIL PROTECTED] 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] ou [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
