Pesquisar na Comunidade

Olá, eu tenho um memo em Delphi com as seguintes linhas CALDO DE GALINHA LEMON PEPPER Preciso que fique com 10 ponto e virgula, já contando os que vão estar no espaço em branco assim: CALDO;DE;GALINHA;;;;;;;; LEMON;PEPPER;;;;;;;;; Pra substituir os espaços em branco já usei o stringreplace e funcionou corretamente: memo1.text := StringReplace(memo1.text,',',';',[rfReplaceAll]);

Fiz os programas no Lazarus(Delphi 7 para Linux): Visualizador de imagem: Download do programa: https://gitlab.com/BuiuDeJaraguaDoSul/visualizadordeimagemslackware/-/raw/master/VisualizadorDeImagem-0.1.0-x86_64-1.txz Calculadora Completa: Download do programa: https://gitlab.com/BuiuDeJaraguaDoSul/calculadoracompletaslackware/-/raw/master/CalculadoraCompleta-0.1.0-x86_64-1.txz Calculadora De Décimo Terceiro Salário: Download do programa: https://gitlab.com/BuiuDeJaraguaDoSul/calculadoradedecimoterceirosalarioslackware/-/raw/master/CalculadoraDeDecimoTerceiroSalario-0.1.0-x86_64-1.txz Calculadora Empresarial: Download do programa: https://gitlab.com/BuiuDeJaraguaDoSul/calculadoraempresarialslackware/-/raw/master/CalculadoraEmpresarial-0.1.0-x86_64-1.txz Criptografador: Download do programa: https://gitlab.com/BuiuDeJaraguaDoSul/criptografadorslackware/-/raw/master/Criptografador-0.1.0-x86_64-1.txz Cronômetro: Download do programa: https://gitlab.com/BuiuDeJaraguaDoSul/cronometroslackware/-/raw/master/Cronometro-0.1.0-x86_64-1.txz Editor De Texto: Download do programa: https://gitlab.com/BuiuDeJaraguaDoSul/editordetextoslackware/-/raw/master/EditorDeTexto-0.1.0-x86_64-1.txz Gerador de Senha: Download do programa: https://gitlab.com/BuiuDeJaraguaDoSul/geradordesenhaslackware/-/raw/master/GeradorDeSenha-0.1.0-x86_64-1.txz

Fiz os programas no Lazarus(Delphi 7 para Linux): Cronômetro: Download do programa: https://gitlab.com/BuiuDeJaraguaDoSul/cronometrofedora/-/raw/master/Cronometro-1.0-1.x86_64.rpm Gerador De Senha: Download do programa: https://gitlab.com/BuiuDeJaraguaDoSul/geradordesenhafedora/-/raw/master/GeradorDeSenha-1.0-1.x86_64.rpm Criptografador: Download do programa: https://gitlab.com/BuiuDeJaraguaDoSul/criptografadorfedora/-/raw/master/Criptografador-2.0-1.x86_64.rpm Visualizador de Imagem: Download do programa: https://gitlab.com/BuiuDeJaraguaDoSul/visualizadordeimagemfedora/-/raw/master/VisualizadorDeImagem-1.0-1.x86_64.rpm Editor de Texto: Download do programa: https://gitlab.com/BuiuDeJaraguaDoSul/editordetextofedora/-/raw/master/EditorDeTexto-1.0-1.x86_64.rpm Calculadora Empresarial: Download do programa: https://gitlab.com/BuiuDeJaraguaDoSul/calculadoraempresarialfedora/-/raw/master/CalculadoraEmpresarial-1.0-1.x86_64.rpm Calculadora de décimo terceiro salário: Download do programa: https://gitlab.com/BuiuDeJaraguaDoSul/calculadoradedecimoterceirosalariofedora/-/raw/master/CalculadoraDeDecimoTerceiroSalario-1.0-1.x86_64.rpm Calculadora Completa: Download do programa: https://gitlab.com/BuiuDeJaraguaDoSul/calculadoracompletafedora/-/raw/master/CalculadoraCompleta-1.0-1.x86_64.rpm

Fiz os programas no Lazarus(Delphi 7 para Linux): Calculadora Completa: Download do programa: https://gitlab.com/BuiuDeJaraguaDoSul/calculadoracompletadebian/-/raw/master/CalculadoraCompleta.deb Calculadora de décimo terceiro salário: Download do programa: https://gitlab.com/BuiuDeJaraguaDoSul/calculadoradedecimoterceirosalariodebian/-/raw/master/CalculadoraDeDecimoTerceiroSalario.deb Criptografador: Download do programa: https://gitlab.com/BuiuDeJaraguaDoSul/criptografadordebian/-/raw/master/Criptografador.deb Gerador de Senha: Download do programa: https://gitlab.com/BuiuDeJaraguaDoSul/geradordesenhadebian/-/raw/master/GeradorDeSenha.deb Cronômetro: Download do programa: https://gitlab.com/BuiuDeJaraguaDoSul/cronometrodebian/-/raw/master/Cronometro.deb Visualizador de imagem: Download do programa: https://gitlab.com/BuiuDeJaraguaDoSul/visualizadordeimagemdebian/-/raw/master/VisualizadorDeImagem.deb Editor de Texto: Download do programa: https://gitlab.com/BuiuDeJaraguaDoSul/editordetextodebian/-/raw/master/EditorDeTexto.deb Calculadora Empresarial: Download do programa: https://gitlab.com/BuiuDeJaraguaDoSul/calculadoraempresarialdebian/-/raw/master/CalculadoraEmpresarial.deb

Bom dia, Preciso de ajuda ajuda para resolver o problema de SIGSEGV, basicamente tennho um zconection dentro de uma classe e recebo erro quando tento acessá-lo. Segue um trecho da classe: unit unt_classconexao; {$mode objfpc}{$H+} interface uses Classes, SysUtils, ZConnection, ZDataset; type { tConexao } tConexao = class private public vConector : TZConnection; function Listar_Usuarios:TZReadOnlyQuery; procedure Conectar_Banco; end; implementation { tConexao } function tConexao.Listar_Usuarios: TZReadOnlyQuery; var zrquery : TZReadOnlyQuery; begin Conectar_Banco; try zrquery := TZReadOnlyQuery.Create(nil); zrquery.Connection := vConector; zrquery.SQL.Clear; zrquery.SQL.Text := 'SELECT * from tbl_profissionais'; zrquery.Open; Listar_Usuarios := zrquery; finally end; end; procedure tConexao.Conectar_Banco; begin //vConector := TZConnection.Create(nil); vConector.HostName := 'localhost'; vConector.Port := 3306; vConector.Database := 'Caps'; vConector.Protocol := 'mysql-5'; vConector.User := 'root'; vConector.Password := ''; vConector.Connected := true; end; end. Após isso tento fazer uso dessa classe para popular um DBGrid: unit unt_frmprincipal; {$mode objfpc}{$H+} interface uses Classes, SysUtils, DB, Forms, Controls, Graphics, Dialogs, Menus, DBGrids, ZConnection, unt_classconexao; type { Tfrm_principal } Tfrm_principal = class(TForm) DataSource1: TDataSource; DBGrid1: TDBGrid; MainMenu_frmPrincipal: TMainMenu; MenuItem_AplicativoSair: TMenuItem; N1: TMenuItem; MenuItem_AplicativoLogin: TMenuItem; MenuItem_Aplicativo: TMenuItem; procedure MenuItem_AplicativoLoginClick(Sender: TObject); private public vConexao : tConexao; end; var frm_principal: Tfrm_principal; implementation {$R *.lfm} { Tfrm_principal } procedure Tfrm_principal.MenuItem_AplicativoLoginClick(Sender: TObject); begin //vConexao := tConexao.Create; DataSource1.DataSet := vConexao.Listar_Usuarios; end; end. A mensagem de erro que recebo dá a entender que o problema ocorre logo que o zconnection começa a ser configurado, como vocês podem ver pelos trechos comentados eu tentei instanciar o componente também sem sucesso. Não tenho experiencia com POO e tenho certeza que estou cometendo um erro bobo, então peço uma explicação sobre como resolver isso. Agradeço de antemão a quem puder me ajudar. PS. Estou usando o Lazarus.