Prozedure anrufen?

[PeterKiers]

Hallo zusammen,

Wie kann ich Prozedure Notification anrufen?

Delphi-Quellcode:

1.   procedure TForm7.Timer4Timer(Sender: TObject);
2.   var
3.   Temp: string;
4.   begin
5.   Temp := FindMelding2(txtLog.Lines.Text);
6.   if Temp <> '' then
7.   consoleLog.Lines.Add(Temp)) and
8.       notification
9.   end;

10.   procedure TForm7.Notification;
11.   begin
12.   if ((CheckBox1.Checked = True) and
13.   (LabeledEdit1.Text <> ‘’) then
14.   SendOutlookMail;

Fehler bei Linie 8:
Operator not applicable to this operand type

Meine Hoffnunf liegt nun bei euch!

Peter Kiers

[Matze]

Ich weiß nicht, was das wird, aber wenn, dann so:

Delphi-Quellcode:

[...]

if Temp <> '' then
begin
  consoleLog.Lines.Add(Temp);
  notification;
end;

Nachtrag: Klammer entfernt, da ist bei dir eine zuviel.

[brechi]

nicht mit and verknüpfen sondern in
begin und end verschachteln

http://www.christian-stelzmann.de/artikel/crashkurs.htm

vielleicht solltest du dir das vorher mal anschaun :)

[Nicolai1234]

Delphi-Quellcode:

procedure TForm7.Timer4Timer(Sender: TObject);
var
Temp: string;
begin
Temp := FindMelding2(txtLog.Lines.Text);
if Temp <> '' then
         begin
         consoleLog.Lines.Add(Temp)); 
         notification;
         end;
end;

//Edit: Kein roter Kasten

[PeterKiers]

Ich Dank euch!

Peter Kiers