Autor
Mensagem
Postado em: 31/10/2011 09:09:16 PM
Tenho o seguinte componente adicionado no form e um button, no button tem o seguinte código:
Acontece que no segundo click da um erro, como se só fosse possivel adicionar texto uma vez no componente.
Agradeço a todos que estiverem lendo meu post, antecipadamente!
#Código
ValueListEditor1.InsertRow(Richard,16,true);
Acontece que no segundo click da um erro, como se só fosse possivel adicionar texto uma vez no componente.
Agradeço a todos que estiverem lendo meu post, antecipadamente!
Postado em: 31/10/2011 09:12:47 PM
Citação:
Tenho o seguinte componente adicionado no form e um button, no button tem o seguinte código:
Acontece que no segundo click da um erro, como se só fosse possivel adicionar texto uma vez no componente.
Agradeço a todos que estiverem lendo meu post, antecipadamente!
Tenho o seguinte componente adicionado no form e um button, no button tem o seguinte código:
#Código
ValueListEditor1.InsertRow(Richard,16,true);
Acontece que no segundo click da um erro, como se só fosse possivel adicionar texto uma vez no componente.
Agradeço a todos que estiverem lendo meu post, antecipadamente!
No código há as aspinhas entre RICHARD e 16, mais o post as tira de alguma maneira.
Postado em: 1/11/2011 12:28:54 AM
Em qual evento vc incluiu este código?
Postado em: 1/11/2011 04:15:06 AM
Aqui está o código:
Porque não posso adicionar o mesmo texto mais de 2 veses?
#Código
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, Grids, ValEdit, StdCtrls;
type
TForm1 = class(TForm)
Button1: TButton;
ValueListEditor1: TValueListEditor;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
{$R *.dfm}
procedure TForm1.Button1Click(Sender: TObject);
begin
ValueListEditor1.InsertRow(Richad,16,true);
end;
end.
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, Grids, ValEdit, StdCtrls;
type
TForm1 = class(TForm)
Button1: TButton;
ValueListEditor1: TValueListEditor;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
{$R *.dfm}
procedure TForm1.Button1Click(Sender: TObject);
begin
ValueListEditor1.InsertRow(Richad,16,true);
end;
end.
Porque não posso adicionar o mesmo texto mais de 2 veses?
Postado em: 1/11/2011 11:51:30 AM
Richard, qual o erro que ocorre?
Fiz o teste exatamente como no seu exemplo e funcionou!
Fiz o teste exatamente como no seu exemplo e funcionou!
Postado em: 1/11/2011 05:20:10 PM
P: A opção KeyUnique da propriedade KeyOptions está igual a true?
R: Sim, por isso estava dando o tal erro, eu desativei a opção e foi possivel adicionar valores iguais.
Bom que isso ajuda futuros problemas :D eu não manjo muito de inglês e por isso não percebi que unique significa único/incomparavel já iria ter uma ligação.
Obrigado a Todos!
Devo ter ganhado um ponto pois eu ajudei alguem (eu).
R: Sim, por isso estava dando o tal erro, eu desativei a opção e foi possivel adicionar valores iguais.
Bom que isso ajuda futuros problemas :D eu não manjo muito de inglês e por isso não percebi que unique significa único/incomparavel já iria ter uma ligação.
Obrigado a Todos!
Devo ter ganhado um ponto pois eu ajudei alguem (eu).
