procedure TSoftShare.SetUseHDSerial(AState: Boolean); begin FUseHDSerial := AState; FUseDateTime := not FUseHDSerial; end;
procedure TSoftShare.SetUseDateTime(AState: Boolean); begin FUseDateTime := AState; FUseHDSerial := not FUseDateTime; end; -----Original Message----- From: Alistair George [mailto:[EMAIL PROTECTED]] Sent: Monday, 16 December 2002 8:02 a.m. To: Multiple recipients of list delphi Subject: [DUG]: Designing Component, Sender to Component, Hiding Stringgrid Colum Hi. I have a bunch of questions. Answers to any appreciated: Q1 altering a registration component. On the components property form, I want to have two properties: UseHdSerialNumber & UseDateTime, each exclusive. Thus if one is selected True, the other is forced to False (and displays False). Please; how to alter the other Property at design-time. I did the following but not correct: procedure TSoftShare.SetUseHDSerial(AState: Boolean); begin FUseHDSerial := AState; if AState then SetUseDateTime(false); end; procedure TSoftShare.SetUseDateTime(AState: Boolean); begin FUseDateTime := AState; if AState then SetUseHDSerial(false); end; Q2: I want to pass some parameters to a showmodal form; How to do please: procedure TMainform.About1Click(Sender: TObject); begin with Tb4winForm.Create(nil) do try ShowModal; finally release; end; end; Should I just declare a global variable from within the caller routine, or can I (preferably) pass the parameter within the above code? Q3: I have a non-standard stringgrid. I have to include column data which should not be displayed. There seems to be no hidecolum function in stringgrids is this correct? (Or any other alternative suggestion - I dont want the column to display, not just make the contents invisible). Thanks very much. Alistair+ --------------------------------------------------------------------------- New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED] Website: http://www.delphi.org.nz To UnSub, send email to: [EMAIL PROTECTED] with body of "unsubscribe delphi" Web Archive at: http://www.mail-archive.com/delphi%40delphi.org.nz/ --------------------------------------------------------------------------- New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED] Website: http://www.delphi.org.nz To UnSub, send email to: [EMAIL PROTECTED] with body of "unsubscribe delphi" Web Archive at: http://www.mail-archive.com/delphi%40delphi.org.nz/