Bestimmtes Bit auslesen, bearbeiten, schreiben

[Praktikant]

Neuer Tag, neue Frage:
Jetzt habe ich ein 16 Bit String welcher in einer Paradox Tabelle steht.
Davon lese ich abhängig von einer onclick Aktion paarweise Bits aus.
(Bsp. bitmap1.click -> bit 4&5, bitmap2.click -> bit 12&13).

Dies habe ich folgend gelöst:

Delphi-Quellcode:

if Bit[4]='1' then
  if Bit[5]='1' then
    [...]
  else
    [..]

Sicherlich nicht schön aber es geht.


Nun wird durch eine radiobutton Auswahl und buttonok Bestätigung 2 bestimmte Bit geändert, wiederum abhängig von meiner bitmap Auswahl. Änderung wird in eine Tabelle eingetragen.
Der buttonok ist immer derselbe, habe jedoch ein feld in welches eingetragen wird, welches bmp (sind ca. 20stck) und somit welches bit ich meine.

Wie kann ich nun die korrekten Bits ändern, ohne zig if Abfragen?

[edit=Daniel B]Delphi-Tags eingefügt. Mfg, Daniel B[/edit]