From: sasa.bistrovic@ck.t-com.hr   
      
   SetEnvironmentVariable PROBLEM   
      
   How to get in SHOWMESSAGE dialog box CHAR 'A' ?   
      
   ---->>>Project1.DPR BEGIN---->>>   
   program Project1;   
      
   uses   
     SysUtils, Dialogs, Math, Windows;   
      
   var I:integer;   
      
   begin   
   I:=FileCREATE('DATA.TXT');   
   FileWrite(I,'DATA.TXT',Length('DATA.TXT'));   
   FileSeek(I,1,1);   
   FileRead(I,PChar(SetEnvironmentVariable(PChar('DATA'),nil))^,1);   
   showmessage(GetEnvironmentVariable(PChar('DATA')));   
   end.   
   <<<----Project1.DPR END<<<----   
      
   PLEASE HELP.   
      
   THANK YOU.   
      
   --- SoupGate-Win32 v1.05   
    * Origin: you cannot sedate... all the things you hate (1:229/2)