Perguntas com a tag [delphi]
Delphi é uma linguagem para o rápido desenvolvimento de aplicações nativas para Windows, OS X, iOS e aplicações Android. O nome refere-se tanto à linguagem Delphi (uma evolução moderna do Object Pascal) bem como a sua IDE, que é usada para ajudar a editar e depurar projetos Delphi.
1,382
perguntas
3
votos
2respostas
206 visitas
FDQuery quais os riscos em usar variável no lugar de Parâmetro
Estou fazendo uma conexão pra buscar dados dentro do banco com uma condição IN(), porém tive dificuldades em implementar isso entre FDQuery e o FireBird.
Analisando o problema percebi que comando SQL ...
0
votos
1resposta
199 visitas
Delphi Problemas ao Listar Sub-Nó do XML
Tenho o código abaixo, porém no nó do [ICMS]. ele põe na mesma
linha não estou conseguindo ler os filhos. Acontecendo o mesmo com o
[PIS] e [COFINS].*
Ele não obedece o nível 2. Como pegar ou checar ...
1
voto
2respostas
91 visitas
Como melhorar o desempenho de um gerador de arquivos xls em minha aplicação Delphi 4 + SQL Server 2000?
Implementei o procedimento abaixo em uma aplicação feita em Delphi 4, porém o tempo para gerar um arquivo xls com os dados do Dataset é de 55 segundos e o dataset tem aproximadamente 50 linhas. Alguma ...
1
voto
1resposta
1mil visitas
Delphi Percorrer os Nós de Um XML (DOM)
Tenho o código abaixo, porém não estou conseguindo listar o nome do nó e seu valor. Consigo pesquisar e mostrar o nó principal tipo [ide] porém o sub-nó que seria [cUF] + valor isso eu não consigo.
...
-2
votos
2respostas
59 visitas
Delphi Dois métodos para OnMessage
No Delphi, é possível setar dois métodos para o evento OnMessage do TApplication?
Detalhe: os dois devem funcionar simultaneamente.
Ex.:
TApplication.OnMessage := MetodoA();
TApplication....
1
voto
1resposta
170 visitas
Chamada de função de dll C# (VS2010) utilizando COM em Delphi 5 não passa os parâmetros corretamente
Bom dia,
Criei utilizando UnmanagedExports uma dll em c# (Visual Studio 2010) para ser consumida em um form delphi 5, conforme:
C#:
using System;
using System.Collections.Generic;
using System.Linq;
...
1
voto
1resposta
2mil visitas
Bad Request em Post idHTTP com Delphi
estou tentando comunicação com a API de um ecommerce e de todas as dezenas de tentativas que
fiz somente recebo como resposta "HTTP request failed 400 HTTP/1.1 400 Bad Request".
Pelo que me ...
0
votos
2respostas
171 visitas
Delphi Seattle problemas com Sockets
[Delphi Seattle] Tenho uma unit que tem uses no Sockets(de um fonte que estava no Delphi XE2), o uses não reconhece.. alguem sabe como proceder? Obs: Ai sem esse uses tenho mais problemas pois não ...
0
votos
2respostas
106 visitas
Atribuição de valor a variável [fechada]
Tenho duas variáveis globais, que vamos chamar de A e B, quando faço a seguinte atribuição:
A:= 5;
B:= A;
Toda vez que mudo o valor de A, o valor de B também muda. Se eu fizer
A:= 10
B passa a ...
-2
votos
2respostas
105 visitas
Erro comparando strings em Delphi
Estou usando o código:
conexao.First;
while not conexao.Eof do
begin
if (conexao.FieldValues['complex'] = '02' and conexao.FieldValues['financ'] = '04') then
total24:= total24 + conexao....
0
votos
1resposta
1mil visitas
Erro ao abrir/criar base no firebird
Estou com um problema com o Firebird. Fiz a instalação do Delphi e Firebird, mas quando tento abrir a base ele dá erro. Tentando abrir pelo ibexpert dá o seguinte erro
unsuccessful execution caused ...
-1
votos
5respostas
1mil visitas
Query passar parâmetro null
Consigo passar o valor is null ou is not null através de uma Query?
Exemplo no SQL:
select * from tb_teste where tb_teste.data_hora :PARAMETRO;
No Delphi:
Query.ParamByName('PARAMETRO').value = '...
-2
votos
3respostas
752 visitas
Focar item no Listbox com Delphi
O código a seguir funciona apenas se digitar a string completa, gostaria de modificar o código para também focar no listbox quando parte do texto for digitado estilo autocomplete
procedure Tform1....
5
votos
2respostas
121 visitas
Quais as consequências de sair do sistema sem fechar as tabelas?
Quais as consequências de Sair / Encerrar de um sistema sem fechar as tabelas do banco de dados? Isso prejudica em alguma coisa no banco de dados?
Eu devo ou não fechar as tabelas do sistema?
...
2
votos
1resposta
48 visitas
Arquivo de recurso duplicado
Estou com um projeto que tem as seguintes diretivas de arquivos de recursos:
{$R *.DFM}
{$R UAC.res}
Depois que eu copiei uma parte do projeto para outra pasta, me apresenta o seguinte erro após ...
0
votos
2respostas
263 visitas
TOpenPictureDialog não pega o caminho da pasta Imagens
Tenho no meu formulário um componente TOpenPictureDialog para abrir as Imagens em um sistema, só que em vez dele pegar o caminho completo do arquivo de imagem ele pega apenas o alias.
Ex
Como eu ...
0
votos
1resposta
121 visitas
Erro ao compilar no delphi: expected BEGIN but received UNIT
tento compilar e aparece esse erro: expected BEGIN but received UNIT at line 9
segue o codigo.
Unit Unit1;
interface
uses
Windows, Messages, SysUtils,
Classes, Graphics, Controls, Forms, Dialogs, ...
0
votos
1resposta
131 visitas
Como detectar Left e Top atuais do Form ao arrastar (no Delphi)?
Preciso detectar o valor de Left e Top do Form (em tempo real) ao arrastar e exibir os valores em SpinEdits (SEdtX e SEdtY).
Estou utilizando o código abaixo, porém sem sucesso:
private
{ ...
0
votos
0respostas
508 visitas
Como saber se uma pasta existe com IdFTP delphi?
Preciso saber se uma pasta existe no ftp
Estou usando a função abaixo, mas da erro:
---------------------------
Debugger Exception Notification
---------------------------
Project perfil.exe raised ...
1
voto
1resposta
2mil visitas
Como salvar relatório FastReport em PDF em modo silencioso?
Eu consigo gerar o PDF a partir do código abaixo:
fdm.frxPDFExport.FileName := 'C:\PASTA_TESTE\ARQUIVO_TESTE.PDF';
frxReport.PrepareReport();
frxReport.Export(fdm.frxPDFExport);
O detalhe é que ele ...
1
voto
1resposta
285 visitas
Como executar uma procedure somente quando a anterior terminar?
Tenho 2 procedures, uma faz a compactação do arquivo e a outra faz o envio pro FTP, porém a procedure de envio, está executando simultaneamente com a procedure de compactação, e tenta enviar o arquivo ...
0
votos
1resposta
197 visitas
Retornar um Result set de uma storedeProcedure MySql
Boa tarde.
Tenho a seguinte storedprocedure no MySql..:
DELIMITER $$
CREATE DEFINER=`ricardo`@`%` PROCEDURE `teste2`()
BEGIN
Select * from Tabela;
END
Como eu chamo esta storedprocedure ...
1
voto
2respostas
328 visitas
Utilizando o compomente DateTimePicker com Time
Estou utilizando o componente TDateTimePicker.
Coloquei na propriedade FORMAT o seguinte valor: dd/MM/yyyy HH:mm:ss
Em execução no form se não "clicar" no componente e mudar os valores, exemplo
21/...
-1
votos
1resposta
324 visitas
Verificar se registro já existe em DB Grid Delphi
Boa tarde, pessoal.
A linguagem que estou utilizando é Delphi 4.
Estou com uma dúvida em como verificar se um registro já existe em DB Grid.
Os valores que desejo inserir no DBGrid vão ser digitados ...
0
votos
1resposta
439 visitas
Armazenar imagem(jpg) em uma variável - Delphi
Estou com uma dúvida em relação a armazenar uma imagem em uma variável no Delphi. Estou utilizando uma função que salva como imagem uma assinatura coletada em um coletor de assinatura digital (Step ...
1
voto
1resposta
55 visitas
Como ocultar as imagens do sistema, de aplicativos de galeria firemonkey android?
Preciso que as imagens usadas no sistema não apareçam no aplicativo de galeria do android, pois são imagens usadas apenas pelo sistema e ao visualiza-las alguns clientes as apagam.
0
votos
1resposta
60 visitas
Erro TEdit / TDBEdit [fechada]
Estou com um pequeno problema. Quando eu uso o TEdit no meu formulário, as teclas que eu digito são capturadas pela caixa de texto (o que é normal!), Porém quando eu uso um TDBEdit, as teclas não são ...
0
votos
1resposta
556 visitas
Quebrar linha automaticamente na exportação para o Excel pelo Delphi
Estou fazendo uma exportação para o Excel utilizando o Delphi.
Em certo momento, um texto acaba sendo maior que o tamanho da célula, "estourando" seu conteúdo para fora da célula ao abrir o arquivo ....
3
votos
2respostas
384 visitas
Como localizar todos os caracteres '>' de um memo e armazenar em um vetor utilizando delphi?
Tenho um campo edit no Delphi e preciso percorrê-lo em busca do caractere > e armazenar a posição de todos os caracteres > em um vetor.
Fazendo da seguinte forma eu consigo pegar a posição ...
0
votos
1resposta
124 visitas
Obtendo String via Delphi e PHP
Senhores, boa noite!
Estou com um problema há 3 dias sem conseguir uma solução.
O código abaixo, eu utilizo para obter uma string como forma de autenticação. A variável sPOST apresenta a string "...
0
votos
1resposta
376 visitas
Firedac - Datasnap + FDMemtable + fkInternalCalc
Estou enfrentando problemas com campos fkInternalCalc ao migrar de TClientDataSet para TFDMemtable.
Utilizamos esses campos para manipulação de dados em memória, mas eles, não serão persistidos, isso ...
1
voto
1resposta
175 visitas
Obter valor de um TJSONString pelo Firemonkey (Delphi)
boa tarde!
Estou com um problema e gostaria de ver se vocês podem me ajudar.
Possuo um servidor DataSnap, o qual está funcionando normalmente. Nele, eu faço inclusão e consulta na base de dados por ...
2
votos
1resposta
401 visitas
Pegando o nome da Impressora Padrão
Consigo pegar o nome da impressora padrão declarado Printers na seção uses:
Printer.Printers[Printer.PrinterIndex]
Se por acaso, durante a execução do programa o usuário trocar a impressora padrão. ...
1
voto
0respostas
383 visitas
Criar função que receba um XML no Servidor SOAP (delphi)
Bom dia.
Lendo vários arquivo,tutoriais, etc na net, consegui entender e desenvolver um servidor SOAP (Delphi 7 e Tokyo).
Criei varias funções para receber valores e retornar resposta..
Criei um ...
0
votos
1resposta
97 visitas
Como capturar status do windows (suspenso/hibernando) via código Delphi
Gostaria de verificar o status do windows (suspenso/hibernando) antes de executar uma ação.
Exemplo
if suspenso=true then
//executa algo
Desde já agradeço.
0
votos
1resposta
526 visitas
É possível obter o numero do SIM no firemonkey(Delphi)?
É possível conseguir o número do celular (numero do SIM) no delphi firemonkey?
Estou procurando em forums a algumas horas e não achei nenhum exemplo o biblioteca que permita conseguir o numero do ...
-1
votos
1resposta
45 visitas
Não consigo gravar dados em um arquivo txt
Código:
qr.ParamByName('mes').AsString:= edmes.Text;
qr.ParamByName('ano').AsString:= edano.Text;
qr.Active:= true;
qr.First;
try
AssignFile(arq, 'relatorio.txt');
Rewrite(arq);
showmessage(...
1
voto
3respostas
776 visitas
TXMLDocument carregar a partir de uma String
Sou nova em Delphi e estou tendo problemas para carregar um documento XML a partir de uma string. Não dá nenhum erro, simplesmente não carrega, isso me faz pensar que eu deve estar cometendo algum ...
1
voto
3respostas
459 visitas
Erro Evento ListView ( ListView1UpdateObjects ), para mostrar ou ocultar item. ( Delphi firemonkey )
Se alguém puder me ajudar, estou com um problema em um método de um ListView, o método é o TForm13.ListView1UpdateObjects nele eu faço o seguinte procedimento: verifico o valor de um item para decidir ...
0
votos
0respostas
159 visitas
Problemas ao executar função do Mysql usando o FireDAC do Delphi 10.1
Em um banco MySql tenho uma função(Não é procedure) totalmente funcional, consigo acessar normalmente dentro do heidisql.
No Delphi, faço o seguinte
function ExecutarFuncaoSQL(sFuncao: string; ...
0
votos
2respostas
679 visitas
Borda em um TEdit
Estou precisando colocar uma borda no TEdit de um cadastro, quando este campo for requerido e estiver em branco no momento de salvar o cadastro.
Já consegui colocar a borda, porém não estou ...
0
votos
1resposta
64 visitas
Como usar o tipo TBitmap32 (Delphi) em uma DLL chamada em C++?
Olá!
Estou precisando criar uma DLL em Delphi, para usá-la em um programa escrito em C++. Esta DLL deve manipular uma imagem (obtida por meio do path passado como parâmetro da função).
No entanto, ...
0
votos
1resposta
233 visitas
Como acessar base mysql de uma rede externa
Tenho uma aplicação, em Android com banco de dados MySQL, que funciona perfeitamente dentro de uma rede específica. Porém ao tentar acessar essa mesma base em uma rede externa recebo a seguinte ...
4
votos
1resposta
141 visitas
Porque existe FloatToStr se o Delphi não possui o tipo de dado Float?
Lendo sobre os tipos de dados do Delphi/Pascal percebi que não existe o tipo Float, porém, existe a função FloatToStr(), assim como StrToFloat().
Neste caso, poderia utilizar variável de ponto ...
0
votos
3respostas
1mil visitas
Contar Quantidade de Letras em uma String - Delphi
Estou criando um programa em que será necessário mostrar a quantidade de letras (A, b, C ..Z; a..z, à,â,ã) presentes em uma String.
Estou usando o seguinte código:
function ContarLetras(Str: String):...
0
votos
1resposta
388 visitas
Usar os valores de uma variável array de um procedimento na rotina principal do algoritmo
program nome_jogadores_futebol_basquete_volei;
{$APPTYPE CONSOLE}
uses
SysUtils;
procedure futebol;
var
i: integer;
jogador: array[1..11] of string;
begin
for i := 1 to 11 do
...
2
votos
1resposta
138 visitas
Usar ou não definição de bloco em “if” simples influencia no desempenho da aplicação?
Entre uma linha e outra surgem algumas dúvidas que não alteram em nada o fluxo de decisões, mas talvez possa influenciar no desempenho da aplicação pela quantidade de linhas extras dependendo da ...
0
votos
1resposta
74 visitas
Como utilizar TopIndex no Delphi FMX?
Saudações. No Delphi VCL o ListBox tem a propriedade TopIndex. E no Delphi FMX como usar isso?
Desde já agradeço.
2
votos
0respostas
157 visitas
Como capturar vários campos retornados de um Select usando Stored Procedure com parâmetros informados e colocar dentro de variáveis usando SqlServer?
-- Será retornado um conjunto de dados após informar 2 parâmetros, eu preciso pegar esse conjunto de dados e colocar em variáveis.
@ClienteTipoVeiculo VARCHAR(5),
@cdVeiculo int
as
if (@...
1
voto
1resposta
189 visitas
Como usar ponteiros no delphi?
Tenho o seguinte trecho de código:
if TMenuItem(fmPrincipal.FindComponent('teste')) <> nil then
if TMenuItem(fmPrincipal.FindComponent('teste')).Visible then
...
Procuro um item ...