Dúvidas em conversão de código Delphi para C#

[vitaospfc 0]

Olá, preciso fazer uma aplicação em C# onde o usuário digita dez números e o programa mostra todas as combinações possíveis de 6 algarismos utilizando os dez números digitados. Já sei que o total de combinações é de 210.

 

Achei esse código em Delphi, e estou tentando convertê-lo para C#, alguém que entenda das duas pode me explicar? Só a parte mais "grossa", ou seja, a dos comandos, declaração de variáveis, etc. isso eu já sei.

 

Obs: Já existem funções pré definidas que executam tal tarefa, mas não posso utilizá-las, devo fazer "na raça"

 

o código:

 

_______________________________________________________________________

var st : TStringList;

a,b,c,d,e,f : integer;

begin

st:= TStringList.Create;

st.Clear;

st.Add('0');

st.Add('1');

st.Add('2');

st.Add('3');

st.Add('4');

st.Add('5');

st.Add('6');

st.Add('7');

st.Add('8');

st.Add('9');

p.Max:=10*9*8*7*6*5;

p.Position:=0;

grid1.RowCount:=2;

grid1.Rows[1].Clear;

for a:= 0 to 9 do

for b:= 0 to 9 do

begin

if b<>a then

for c:= 0 to 9 do

begin

if (c<>b) and (c<>a) then

for d:= 0 to 9 do

begin

if (d<>c) and (d<>b) and (d<>a) then

for e:= 0 to 9 do

begin

if (e<>d) and (e<>c) and (e<>b) and (e<>a) then

for f:= 0 to 9 do

begin

if (f<>e) and (f<>d) and (f<>c) and (f<>b) and (f<>a) then

begin

p.Position:=p.Position+1;

Application.ProcessMessages;

grid1.cells[0,grid1.RowCount-1]:=st.Strings[a]+st.Strings+st.Strings[c]+st.Strings[d]+st.Strings[e]+st.Strings[f];

grid1.RowCount:=grid1.RowCount+1;

end;

end;

end;

end;

end;

end;

grid1.rowcount:=grid1.rowcount-1;

showmessage(inttostr(grid1.RowCount-1));

end;

_____________________________________________________________________

 

Desde já, obrigado a todos.