Einzelnen Beitrag anzeigen

Benutzerbild von leddl
leddl

Registriert seit: 13. Okt 2003
Ort: Künzelsau
1.613 Beiträge
 
Delphi 2006 Professional
 
#2

Re: If-Abfrage, die einen Befehl (Console) überprüfen kann (

  Alt 16. Mär 2006, 17:34
So?
Delphi-Quellcode:
if pos('#color', line) = 1 then
begin
  // Console = TMemo
  if pos('(black)', line) > 0 then
    Console.color := clBlack
  else
    if pos('(marron)', line) > 0 then
      Console.color := clMaroon
    else
      Console.Lines.Add('Ungültiger Parameter');
end;
Axel Sefranek
A programmer started to cuss, cause getting to sleep was a fuss.
As he lay there in bed, looping round in his head
was: while(!asleep()) ++sheep;
  Mit Zitat antworten Zitat