Ir para conteúdo
Fórum CódigoFonte.net

tfrutuoso

Membros
  • Total de itens

    2
  • Registro em

  • Última visita

  1. Fala galera, beleza, estou precisando de uma ajuda.tenho uma StringGrid, nela tem uma digitação de horas, exemplo, onde E = Entrada e S = Saída| E-1 | S-2 | E-2 | S-2 || 08:00 | 12:00 | 13:00 | 18:00 |o StringGrid esta com a Mascara de Hora funcionado certinho __:__, neste caso, existe 5 caracteres, mais será digitado somente 4, apos essa digitação ir para a próxima coluna, exemplona E-1 digito 08:30, apos o ultimo zero, ir para a coluna S-1 e assim por diante.Tem como fazer isso, eu conhecia o Length, que faz a contagem de caracteres, apos essa contagem, faz a tabulação, ja no Delphi não achei nada sobre.Att,
  2. Eu estou tentando fazer com que apos digitas as horas e minutos (08:15) na coluna da DBGrid ele va para a proxima coluna, tipo um maxlength. Esta DBGrid esta vinculada a um TFDTable achei esta Procedure, mais não sei como utilizar: procedure TDBGridInplaceEdit.KeyUp(var Key: Word; Shift: TShiftState); var ALimit: integer; begin with TCustomDBGrid(Grid) do begin ALimit:=GetEditLimit; if (ALimit > 0) and (Length(Self.Text) >= ALimit) then MoveCol(DataToRawColumn(Col), 0); end; inherited KeyUp(Key, Shift); end; alguém sabe como fazer ou pode me ajudar com essa situação, tem esse codigo tambem, mais sem sucesso: procedure TForm1.grdMyGridKeyUp(Sender: TObject; var Key: Word; Shift: TShiftState); begin with grdMyGrid do if (Key=VK_TAB) and (SelectedIndex=3) and (Fields[2].AsString='D') then SelectedIndex := 6; end;
×
×
  • Criar Novo...