fixed cleaning up project searhc paths with makros

git-svn-id: trunk@9134 -
This commit is contained in:
mattias 2006-04-17 09:49:04 +00:00
parent b0be3088b7
commit 0b0ce2bb5e
3 changed files with 5 additions and 4 deletions

View File

@ -675,8 +675,9 @@ begin
// make path absolute
if (CurPath<>'') and (not FilenameIsAbsolute(CurPath)) then
CurPath:=AppendPathDelim(BaseDirectory)+CurPath;
if (CurPath='') or (not DirectoryExists(CurPath)) then begin
if ((CurPath='') and (MacroStartPos<1))
or (not DirPathExistsCached(CurPath)) then begin
// path does not exist -> remove
Result:=copy(Result,1,StartPos-1)+copy(Result,EndPos+1,length(Result));
EndPos:=StartPos;

View File

@ -6519,6 +6519,8 @@ begin
TimeID:=0; // = GDK_CURRENT_TIME, better use the current event^.time, but
// how to retrieve that value?
// IMPORTANT: To retrieve data from xterm or kde applications
// the time id must be 0 or event^.time
repeat
while TimeIDExists(TimeID) do begin
inc(TimeID);

View File

@ -1,5 +1,3 @@
{ This is an automatically generated lazarus resource file }
LazarusResources.Add('TForm1','FORMDATA',[
'TPF0'#6'TForm1'#5'Form1'#7'Caption'#6#5'Form1'#12'ClientHeight'#3','#1#11'Cl'
+'ientWidth'#3#144#1#13'PixelsPerInch'#2'p'#18'HorzScrollBar.Page'#3#143#1#18