-
Total de ítens
342 -
Registro em
-
Última visita
-
Days Won
3
Community Answers
-
Duarte's post in visionKit delphi 11.1 was marked as the answer
Resolvi pessoal, a nomenclatura deste framework agora é apenas Vision.
-
Duarte's post in ListView FireMonkey was marked as the answer
Boa tarde, depois de muito quebrar a cabeça achei a solução, vou deixar aqui, caso alguém precise.
procedure InsertItemListView(AListView : TListView; ADataSet : TDataSet; AHeader, AText, ADetail, ADetail1, ADetail2, ADetail3 : string);
begin
try
AListView.BeginUpdate;
AListView.Items.Clear;
with ADataSet do
begin
First;
while not Eof do
begin
if Trim(AHeader) <> '' then
with AListView.Items.Add do
begin
Text := ADataSet.FieldByName(AHeader).DisplayText;
Purpose := TListItemPurpose.Header; //Aqui é o pulo do gato para add os Headers. Na verdade você add dois items, um será o Header e ou outro o item ou itens, sendo que podemos add vários itens tem do mesmo headers. No meu caso será um para cada.
end;
with AListView.Items.Add do
begin
Text := FieldByName(AText).DisplayText;
Detail := FieldByName(ADetail).AsString;
Data[TMultiDetailAppearanceNames.Detail1] := FieldByName(ADetail1).DisplayText;
Data[TMultiDetailAppearanceNames.Detail2] := FieldByName(ADetail2).DisplayText;
Data[TMultiDetailAppearanceNames.Detail3] := FieldByName(ADetail3).DisplayText;
Tag := RecNo;
end;
Next;
end;
end;
finally
AListView.EndUpdate;
end;
end;
-
Duarte's post in Erro FireDAC. was marked as the answer
Bom dia,
Quero aqui deixar a solução do problema, pois em nenhum lugar conseguir uma resposta, e depois de muito lutar, graças a Deus achei!
O erro estava no banco de dados, ou seja, corrompido! Depois de checar todos os objetos do banco, não apenas os casuais, mais todos que o firebird nos libera atrás de tabelas do sistema, constatei que, todas as regras de validades em Check dos domínios no firebird são gravados em campos blob na tabela do sistema “Firebird”. Tenho alguns domínios que tem validações no chack “Check” para garantir uma boa integridade do banco, um deles é chamado “D_Situacao” aonde valida as situações aceitáveis pelo banco, foi exatamente neste (domínio) que dentro da tabela interna do firebird que corrompeu.
Solução! Extrai o metabase do banco, crie um novo banco e usei um aplicativo que por sinal gosto muito “DataPump” migrei os dados e pronto...
Poderia apenas fazer um backup/restory, creio que sim, mais como já estava muito chateado com o erro, preferir ser mais cauteloso levando os dados para um banco criado do zero.
-
Duarte's post in Erro leitor de código de barras was marked as the answer
Boa tarde,
Pessoal já resolvi, na migração, acabei alterando uma const que armazenava o Sufixo "Estava passando String", assim o componente ficava em loop... causando o travamento do sistema...