Új hozzászólás Aktív témák

• #528 _thomas_ tag lamadou #527

  Új Válasz 2005-01-03 00:07:56 #528

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  _thomas_

  tag

  válasz lamadou #527 üzenetére

  hi!
  
  ebben a pldában egy TButton komponenst mentünk ki háttártárra, a test.dat fileba.
  
  procedure save();
  var
  f : TFileStream;
  begin
  try
  f := TFileStream.Create('c:\test.dat',fmCreate);
  f.Seek(0,500);
  //komponenst mentünk ki vinyóra a TButton helyett természetesen a nevét kell megadni!
  f.WriteComponent(TButton);
  finally
  f.Free;
  end;
  end;
  
  
  [Szerkesztve]

Új hozzászólás Aktív témák