$IfDef conditional

[cpalx]

how could i do something like this

Code: Pascal  [Select][+][-]

1. {$IfDef LCLGtk OR LCLQt OR LCLwin32 OR LCLcocoa}  

[Bart]

(Untested):

Code: Pascal  [Select][+][-]

1. {$if defined(LCLGtk) or defined(LCLQt) or defined(LCLwin32) or defined(LCLcocoa)}
2. //your code here
3. {$endif}

Bart

[cpalx]

i wiil try

[cpalx]

Not works

[Zoran]

It does work. I just tested on Windows.
I copied Bart's code, pasted to Lazarus and it works.

This returns 'Defined':

Code: Pascal  [Select][+][-]

1. procedure TForm1.Button1Click(Sender: TObject);
2. begin
3.   {$if defined(LCLGtk) or defined(LCLQt) or defined(LCLwin32) or defined(LCLcocoa)}
4.   Label1.Caption := 'Defined';
5.   {$else}                                                                          
6.   Label1.Caption := 'Not defined';
7.   {$endif}
8. end;

And when I removed defined(LCLwin32), I get 'Not defined':

Code: Pascal  [Select][+][-]

1. procedure TForm1.Button1Click(Sender: TObject);
2. begin
3.   {$if defined(LCLGtk) or defined(LCLQt) or defined(LCLcocoa)}
4.   Label1.Caption := 'Defined';
5.   {$else}                                                                          
6.   Label1.Caption := 'Not defined';
7.   {$endif}
8. end;

[cpalx]

Yes, My Fault. It works