Pergunta : Contando o número de fileiras

Olá! os peritos,

I've começ uma coluna da categoria e uma coluna da subcategoria como esta: o
What do ii
do hh
B do gg
B do ff
B do ee
B do dd
A do cc
A do bb
A do aa
A do

Category SubCategory
A seria a pergunta que me dará para trás uma contagem do número de ocorrências de A e de B retornados em uma ó coluna? o
So eu devo ter uma contagem de 5 para a categoria A e de 4 para a categoria B

Thanks.
class= do

Resposta : Contando o número de fileiras

Eu estou supor que você está Windows API para copiado limas ou similar, assim que você precisa somente PChar e amarra tipos, e compilador de Delphi decidirá, de acordo com a versão, a versão que amável e correta correta do API se usará.

Com corda <2009 :="">= AnsiString de Delphi
(P) Carvão animal = (P) AnsiChar
e todas as janelas API chamadas são a versão do ANSI, ex:
CopyFile = CopyFileA

Com Delphi >=2009
Corda = WideString
Carvão animal = WideChar
e todas as janelas API chamadas são a versão larga


Assim, seu código deve ser feito para compilar com todas as versões, sem jogar demasiado com outros tipos a não ser que quando você não tem a escolha
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
Var
 cDestino, cOrigem: PChar;
 sFile, sPath, sDiaSemana: Corda;
 iProgBar: Inteiro;
e;

  sFile: = “PedItem.db”;
  cOrigem: = strtopchar (sPath+'\ '+sFile);
  cDestino: = strtopchar ('C:\Back - up_AcxSir \ '+sDiaSemana+sFile); 
  CopyFile (cOrigem, cDestino, falsos); 


Anotar que você pode converter a corda a PChar com apenas um molde no aflarin da maneira mostrado para AnsiString & PAnsiChar. 
Assim você pode mesmo chamar sua função em uma linha

  CopyFile (PChar (sPath+'\ '+sFile), PChar ('C:\Back - up_AcxSir \ '+sDiaSemana+sFile), falsos); 
Outras soluções  
 
programming4us programming4us