F�rum delphi #396380

25/02/2011

gostaria q alguem me ajudasse a passar esse codigo java para delph

boolean existeMatricula := false;
for(int i=0; i<ListView_Funcionario.Items.Count ; i++)
{

if(ListView_Funcionario.Items[i].Caption == txtMatricula.text)
{
existeMatricula := true;

eu to qrendo fazer com que o listview compare as matriculas
com a q sta salva se for igual � salvar aparecer uma mensagem
dizendo q a matricula ja sta salva

Curtir t�pico

+ 0

Responder

Posts

25/02/2011

gostaria q alguem me ajudasse a passar esse codigo java para delph

boolean existeMatricula := false;
for(int i=0; i

Responder

Gostei + 0

25/02/2011

Wilson Junior

var
  existeMatricula: Boolean;

begin
  existeMatricula := False;
  for i := 0 to ListView1.Items.Count - 1 do
  begin
    if  ListView1.Items.Item[i].Caption = txtMatricula.text then
      begin
        existeMatricula := True;
        Break;
      end
    ;
  end;

Espero ter colaborado.

Responder

Gostei + 0

25/02/2011

ond fica esse codigo no button salvra?
logo a baixo da matricula ou no inicio do projeto?

Responder

Gostei + 0

25/02/2011

ond fica esse codigo no button salvra?
logo a baixo da matricula ou no inicio do projeto?

e a var i? cm se delcara? o listview � aceita integer

Responder

Gostei + 0

25/02/2011

Wilson Junior

Voc� pode colocar no OnClick do bot�o Salvar:

begin
  if  ExisteMatricula(txtMatricula.Text) then
      ShowMessage('Matr�cula j� existe!')
  else
      //Sua rotina para salvar a matr�cula
  ;
end;

function ExisteMatricula(Matricula: string): Boolean;
var
  x: integer;
begin
  Result := False;

  for x := 0 to ListView_Funcionario.Items.Count - 1 do
  begin
    if  ListView_Funcionario.Items.Item[x].Caption = Matricula then
      begin
        Result := True;
        Break;
      end
    ;
  end;
end;

Espero ter colaborado.

Responder

Gostei + 0

25/02/2011

tem cm eu enviar o meu codigo
d modo q so vc possa ver?

Responder

Gostei + 0

25/02/2011

Wilson Junior

Claro, pode mandar.

Aguardo retorno.

Responder

Gostei + 0

25/02/2011

tem cm mandar por aqui d forma q so vc veja? + ninguem?
cm fa�o?

Responder

Gostei + 0

25/02/2011

vo enviar pro teu endere�o do yahoo tbm?

Responder

Gostei + 0

25/02/2011

Wilson Junior

Vc pode copiar o seu c�digo e colocar aqui mesmo.

Responder

Gostei + 0

01/03/2011

oi gostaria d saber como fa�o para � salvar os dados no listview qndo a tabela � stiver completa?
exemplo em uma tabela ond tenho funcionario, matricula endere�o, cidade, se eu preencher os campos
mas ficar faltando colocar cidade ele � salvar.
????????

Responder

Gostei + 0

01/03/2011

desd ja agrade�o por me ajudar

Responder

Gostei + 0

02/03/2011

Wilson Junior

Quando voc� fala em tabela, o que vc quer dizer com rela��o de como est�o os dados, em um arquivo TXT, componente TClientDataSet, ou como?

Responder

Gostei + 0

02/03/2011

em um cadastro, cm fa�o para alltera um item?
to usando esse codigo so q da um erro dizendo qmasked_matriculafuncionario.text � uma boolean, ai da erro

if (Listview_funcionario.Items[0].caption:=MaskEd_MatriculaFuncionario.Text) then
begin
    ListItem:= ListView_funcionario.Selected;

        ListView_Funcionario.Items[0].caption     :=MaskEd_MatriculaFuncionario.Text;
        ListView_Funcionario.Items[0].SubItems[0] :=Ed_NomeFuncionario.Text;

Responder

Gostei + 0

02/03/2011

eu quero fazer com q ao clicar no item ele ja altere

Responder

Gostei + 0

Mais t�picos