Meldung: Var nicht initzialisiert obwohl wert zugewiesen?!

[f4k3]

Nr. 1 - [Pascal Warnung] Unit1.pas(90): W1036 Variable 'res' ist möglicherweise nicht initialisiert worden

Delphi-Quellcode:

procedure TForm1.IstButtonClick(Sender: TObject);     // Ergebnis Berechnen

var res, op1, op2 : Double;
code              : Integer;
s                 : string;

begin

    if mode = 2 then
    begin

          Val(strBuff1, op1, code);       // strBuff1 in Zahl op1 rückverwandeln
          Val(strBuff2, op2, code);       // strBuff2 in Zahl op2 rückverwandeln

          case op of

            '+':  res := op1 + op2;
            '-':  res := op1 - op2;
            '*':  res := op1 * op2;
            '/':  res := op1 / op2;
          end;

          s:= Format('%g',[res]);       // Ergebnis als Gleitkommazahl formatieren
          Label1.Caption := s;
          mode := 1;
          strBuff1 := '';

    end;



end;

Nr. 2 - [Pascal Warnung] Unit1.pas(143): W1036 Variable 'zei' ist möglicherweise nicht initialisiert worden

Delphi-Quellcode:

procedure TForm1.ZeiButtonClick(Sender: TObject);   // zeichenweise Zahleneingabe

var zei: Char;

begin

    if Sender = Button10  then zei := '0';
    if Sender = Button1   then zei := '1';
    if Sender = Button2   then zei := '2';
    if Sender = Button3   then zei := '3';
    if Sender = Button4   then zei := '4';
    if Sender = Button5   then zei := '5';
    if Sender = Button6   then zei := '6';
    if Sender = Button7   then zei := '7';
    if Sender = Button8   then zei := '8';
    if Sender = Button9   then zei := '9';
    if Sender = Button11  then zei := '.';


    if mode = 1 then
    begin
          strBuff1 := strBuff1 + zei;
          Label1.Caption := strBuff1;
    end

    else
    begin

          strBuff2 := strBuff2 + zei;
          Label1.Caption := strBuff1 + ' ' + op + ' ' + strBuff2;

    end;

end;


end.

Die Variablen wurden doch initzialisiert?! oder seh ich des falsch? Wertzuweisung = Initialisierung?!
Wenn jemand schlauer is, wovon ich sicherlich ausgehe dann klärt mich mal bidde auf, steig da net dahinter woran des etz hapern soll ^^