Changeset 20 for trunk/Messg.pas


Ignore:
Timestamp:
Jan 8, 2017, 12:23:55 PM (7 years ago)
Author:
chronos
Message:
File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/Messg.pas

    r17 r20  
    126126      TButtonBase(Components[cix]).Graphic := GrExt[HGrSystem].Data;
    127127      // if ButtonDownSound<>'*' then
    128       // DownSound:=HomeDir+'Sounds\'+ButtonDownSound+'.wav';
     128      // DownSound:=HomeDir+'Sounds'+DirectorySeparator+ButtonDownSound+'.wav';
    129129      // if ButtonUpSound<>'*' then
    130       // UpSound:=HomeDir+'Sounds\'+ButtonUpSound+'.wav';
     130      // UpSound:=HomeDir+'Sounds'+DirectorySeparator+ButtonUpSound+'.wav';
    131131      if Components[cix] is TButtonA then
    132132        TButtonA(Components[cix]).Font := UniFont[ftButton];
Note: See TracChangeset for help on using the changeset viewer.