[delphi-br] Listar Units

Tue, 02 Dec 2008 08:23:27 -0800 

Pessoal preciso listar todos os nomes das minhas units encontrei o 
codigo abaixo. 

  for i := 0 to Screen.FormCount - 1 do
      MUnits.Lines.Add(GetTypeData(Screen.Forms[i].ClassInfo)^.UnitName 
+ ' {' + Screen.Forms[i].Caption + '} ');

So que tem um problema, ele so lista as units dos forms que estao 
criados. O problema e que eu tenho from que crio em rum time, dai ele 
nao lista. Tem como eu corrigir este procedimento para listar todas as 
units?

Valeu

Responder a