Einzelnen Beitrag anzeigen

marabu

Registriert seit: 6. Apr 2005
10.109 Beiträge
 
#2

Re: Digitaltechnik: Wahrheitstabelle generieren

  Alt 4. Mai 2006, 21:00
Hallo.

Da gibt es ein paar threads:

Wahrheitstabellen
Alle Boolschen Operatoren

Was das Befüllen der Spalte E0 angeht, so solltest du mal eine Skizze machen, wie deine Tabelle aussehen soll.

Delphi-Quellcode:
procedure TForm1.SpinEdit1Change(Sender: TObject);
var
  i: Integer;
begin
  with StringGrid do
  begin
    ColCount := SpinEdit.Value;
    RowCount := Sqr(SpinEdit.Value) + FixedRows;
    for i := 1 to Sqr(SpinEdit.Value) do
      Cells[SpinEdit.Value-1, i] := IntToStr(1 - i mod 2);
  end;
end;
Grüße vom marabu
  Mit Zitat antworten Zitat