Fórum salvar sem usar savedialog #407992
26/09/2011
0
geraldo leal
Geraldo Leal
Curtir tópico
+ 0Posts
28/09/2011
Gustavo Bretas
Cara, verifica se no seu Delphi tem a função: PromptForFileName, na Unit Dialog, talvez ela possa te ajudar!
Abraço!
Gostei + 0
28/09/2011
Gustavo Bretas
Gostei + 0
29/09/2011
Otavio Pimenta
arquivo:= localarquivo +\+nomearquivotexto+.txt;
AssignFile(script,arquivo);//nome + caminho
try
if FileExists(arquivo)then // verifica se existe
append(script)/edita
else
Rewrite(script,arquivo); //abre
Write(script,montascript);//escreve
writeln(script,ajustascript);//pula linha
finally
CloseFile(script);//fecha
end;
dependendo o que for, faça um loop (while not eof)na tabela e vá adicionando linha a linha.
espero que ajude
Gostei + 0
06/10/2011
Geraldo Leal
arquivo:= localarquivo +\+nomearquivotexto+.txt;
AssignFile(script,arquivo);//nome + caminho
try
if FileExists(arquivo)then // verifica se existe
append(script)/edita
else
Rewrite(script,arquivo); //abre
Write(script,montascript);//escreve
writeln(script,ajustascript);//pula linha
finally
CloseFile(script);//fecha
end;
dependendo o que for, faça um loop (while not eof)na tabela e vá adicionando linha a linha.
espero que ajude
o problema, é mesmo nos skins,quando usa qualquer função baseada na dialogs do windows ou delphi. se usar os componentes
da win 3.1 não acontece problema nenhum, fica ai esta dica, pois já tentei de tudo, acredito que tem que trocar os skins
para um mais novo que já corrigiram este bug.Se alguém souber deste problema, e se for isto mesmo agradeço a confirmação ou não do que estou dizendo.
sucesso a todos
geraldo leal
Gostei + 0
07/10/2011
William Galleti
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)