Jhonas

mas apesar da mensagem aparecer e dar um OK o código é executado mesmo assim: isso ocorre porque, quando o evento é acionado e a mensagem é mostrada, existe um comando de saida ( Exit ) do evento. ao sair desse evento, o cursor retorna para quem fez a chamada e continua a partir dali uma das opções é voce criar uma variavel ( publica ) de controle nesse evento e testar essa variavel no retorno dela, e a partir disso cancelar o restante do processamento. abraço

voce tem que instalar o pacote Numpy O NumPy é o pacote fundamental para computação científica em Python. É uma biblioteca Python que fornece um objeto de matriz multidimensional, vários objetos derivados (como matrizes mascaradas e matrizes) e uma variedade de rotinas para operações rápidas em matrizes, incluindo manipulação matemática, lógica, de formas, classificação, seleção, I / O , transformada discreta de Fourier, álgebra linear básica, operações estatísticas básicas, simulação aleatória e muito mais. No núcleo do pacote NumPy, está o objeto ndarray. Isso encapsula arrays n-dimensionais de tipos de dados homogêneos, com muitas operações sendo executadas em código compilado para desempenho. Existem várias diferenças importantes entre os arrays NumPy e as sequências padrão do Python: https://docs.scipy.org/doc/numpy/user/whatisnumpy.html https://scipy.org/install.html https://docs.scipy.org/doc/numpy/user/building.html abraço

voce tem um componente FDQuery e nele voce criou um campo Virtual ( Total ) onde voce atribuiu uma soma do campo A.Quant * A.Valor_Unitario SQL.Text:= 'SELECT SUM(A.QUANT * A.VALOR_UNITARIO) As Total, o que voce tem que fazer agora é mostrar esse campo Total no componente FDQuery e depois atribuir o resultado ao componente Label lblTotal.Caption:= FormatCurr('R$ #,0.00', FDQueryTotal.value); OBS: Não feche a query antes da atribuição do valor ao label, se não o valor não aparece abraço

exemplo: https://pt.stackoverflow.com/questions/152128/equação-de-segundo-grau-em-python abraço

Se o nome do arquivo tiver as letras nfse voce pode filtrar os arquivos do diretorio usando o componente FileListBox linkado ao DirectoryListBox ... altere somente a propriedade Mask do componente FileListBox se as letras nfse estiverem dentro do xml, então durante a leitura do xml, voce podera testar o conteudo da linha, para continuar ou desviar o processamento. verifique dentro do xml da NFe e da NF S-e qual é a linha onde esta essa informação. abraço

Exemplos: https://www.google.com.br/search?source=hp&ei=U-7dWpPwB4OYwgSfmpiQBA&q=calculo+de+raio+javascript&o que=calculo+de+raio+java&gs_l=psy-ab.1.0.33i22i29i30k1.2338.7274.0.10234.20.16.0.4.4.0.189.1820.0j14.14.0....0...1c.1.64.psy-ab..2.18.1857...0j0i131k1j0i13i30k1.0.-lS-W8yYqsU abraço

Não teria um registro preferencial, pode ser qualquer um. Dar um next na query seria a opção mais pratica na sua opinião? Já que voce não quer um registro especifico , pode ser isso sim. assim que for feita a exclusão, voce já pode setar o proximo registro como "S" abraço

tente assim: Qry := TIBQuery.Create(nil); try Qry.Database := FrmDm.dbFisio; Qry.SQL.Add('UPDATE BANCOS SET PRINCIPAL = :PRI'); Qry.SQL.Add('WHERE CODIGO <> :COD'); Qry.ParamByName('PRI').AsString := 'N'; Qry.ParamByName('COD').AsInteger := FrmDm.qrBancosCODIGO.AsInteger; Qry.ExecSQL; finally FrmDm.dbFisio.Refresh; FreeAndNil(Qry); FrmDm.trFisio.CommitRetaining; end; OBS: Se não funcionar assim, tente fechar e abrir novamente a tabela abraço

Não é uma boa solução... imagine que voce tem 300 mil registros ( seria perda no processamento ) para agilizar, voce simplesmente dá um UPDATE ( opção "N" ) somente nos registros que em que o valor for do registro for "S" .... assim voce deixa todos eles como ("N" ) depois, somente no registro que voce selecionar voce coloca o "S" abraço

qual o banco de dados que voce esta usando ?

voce quer definir um campo ou um registro como padrão ?

O que desejo é exatamente o que tem na imagem abaixo. Selecionar um item no meu cadastro e definir ele como default ou principal. Esse item faz parte do componente TRadioGroup ? ou é outra coisa ? abraço

Tente esse link Como descobrir fonte da Letra https://bruno9988.wordpress.com/2013/06/07/como-descobrir-fonte-da-letra/ abraço

no formato que eu gostaria de fazer, precisaria ser um array com dados variáveis. o que voce quer é criar arrays dinamicos... veja nesses links https://www.google.com.br/search?source=hp&ei=RdPTWtKXKIyJwgTY4IWYCA&q=array+dinamico+delphi&o que=array+dina&gs_l=psy-ab.1.1.0l7.1253.3489.0.5354.10.10.0.0.0.0.111.966.8j2.10.0....0...1.1.64.psy-ab..0.10.962...0i131k1.0.Hxhp2-1f9k0 abraço

voce tem muitos exemplos na internet https://www.google.com.br/search?source=hp&ei=TnTTWrOwKomxwATgioPQCw&q=matriz+delphi+exemplo&o que=matriz+delphi&gs_l=psy-ab.1.1.0l2j0i22i30k1l5.1995.6615.0.11063.13.13.0.0.0.0.116.1373.1j12.13.0....0...1.1.64.psy-ab..0.13.1370...0i131k1j0i22i10i30k1.0.T5kzbncT29k https://www.devmedia.com.br/arrays-dinamicos-no-delphi/26960 mas só exemplificando o seu array aCampos : array [ 1..2, 1..3 ] of String ; aCampos[1,1] := /// atribuir um valor tipo string aCampos[1,2] := /// atribuir um valor tipo string aCampos[1,3] := /// atribuir um valor tipo string aCampos[2,1] := /// atribuir um valor tipo string aCampos[2,2] := /// atribuir um valor tipo string aCampos[2,3] := /// atribuir um valor tipo string o valor atribuido até poderia ser assim: aCampos[1,1] := ''COD_FORNECEDOR , Cód. , 70'; mas não da maneira que voce colocou OBS: Se voce olhar no Help do Delphi, vais achar exemplos e explicações sobre arrays abraço

A pesquisa está funcionando perfeitamente. O problema está na definição do array. Se a pesquisa está funcionando, não estou entendendo o motivo de se usar array voce esta querendo armazenar no array ( FieldName , Title e Width ) do campo da tabela não vejo a lógica disso... explique melhor a sua idéia

acho que só o libmariadb.dll ... quando voce colocar o programa em outra maquina, se estiver faltando alguma dll, ele vai mostrar qual esta faltando. http://www2.xailer.com/download/?file=86 abraço

veja esses links: https://stackoverflow.com/questions/36869198/mariadb-silent-install-of-a-msi-with-innosetup-doesnt-work?utm_medium=organic&utm_source=google_rich_qa&utm_campaign=google_rich_qa https://mariadb.com/kb/en/library/installing-mariadb-msi-packages-on-windows/ https://mariadb.com/kb/pt-br/installing-mariadb-deb-files/ https://mariadb.com/kb/pt-br/installing-mariadb-binary-tarballs/ https://www.portalgsti.com.br/2017/08/instalacao-do-mariadb-sgbd-no-linux-debian.html abraço

Veja esses links ... tem exemplos que vão te ajudar https://www.devmedia.com.br/forum/duvida-salvar-imagem-jpg-no-firebird/400958 http://www.activedelphi.com.br/forum/viewtopic.php?t=50025&highlight=cantu OBS: não aconselho armazenar imagens em banco de dados ( dependendo do tamanho, fica muito lento a pesquisa e trafego pela rede ) abraço

Envie uma MP para o Administrador do Forum https://www.scriptbrasil.com.br/forum/profile/1-script-brasil/ abraço

Envie uma MP para o Administrador do Forum https://www.scriptbrasil.com.br/forum/profile/1-script-brasil/ abraço

mostre a configuração no componente

se não escolheu a Foto e tentar salvar aparece a mensagem de aviso. Só que mesmo selecionando a foto e tentar salvar, a mensagem de aviso aparece e não deixar gravar no banco. coloque o código que voce usa para salvar a foto no banco de dados e o código que voce usa para selecionar a foto

Seja Bem Vindo ao Forum Por Favor siga sempre as Regras do Forum e se puder ajudar, os membros agradecem abraço

Referente ao ERRO: O arquivo e a extensão de 'nome_do_arquivo' não correspondem. O arquivo pode estar corrompido ou inseguro. A menos que você confie em sua origem, não o abra. Você quer abri-lo mesmo assim? Essa mensagem deve aparecer quando um arquivo .xlsx foi renomeado como .xls, ou quando um arquivo .xlsx foi renomeado como .xlsm Tente renomear o arquivo para .xlsx e depois para .xlsm e veja o que acontece abraço