Código Delphi
[-]
procedure TForm2.FormActivate(Sender: TObject);
begin
if form1.Edit1.Text=form1.ListBox1.Items.Strings[0] then
memo1.Lines.LoadFromFile('/veryimport/data/time'+inttostr(ix)+'.dll');
labeltimer.Caption:=memo1.Lines.Text;
Esto me quedó asi:
Código Delphi
[-]
procedure TForm2.FormActivate(Sender: TObject);
begin
label2.Caption:=form1.Edit1.Text;
timer1.Enabled:=true;
memo1.Lines.LoadFromFile('/veryimport/data/time/' + form1.Edit1.Text + '.time');
labeltimer.Caption:=memo1.Lines.Text;
end;
Referente a la problematica que tengo es simple, la idea era usar una Base de Datos pero ya por las razones expuestas no pude usarla y tuve que usar ficheros txt para mi solucion.