Registriert seit: 13. Okt 2003
Ort: Künzelsau
1.613 Beiträge
Delphi 2006 Professional
|
Re: If-Abfrage, die einen Befehl (Console) überprüfen kann (
16. Mär 2006, 18: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;
|
|
Zitat
|