recyclebinunitalarmingautosfxaysaliacalllibchecksum-toolscolormanagercryptochatcurrency_converterdecoderdelphiutilsdistributeddpcstudiodpg2fastphpfileformatsfilter_foundryforestgridgameht46f47_simulatorindexer_suiteipe_artfile_utilsjavautilsjumperlightgamelogviewermusikboxmystic_houseoidconverteroidinfo_apioidinfo_new_designoidpluspersonal-webbasephp_antispamphp_clientchallengephp_guestbookphp_utilsplumbersprependsimple_log_eventsokobanspacemissionstackmanuserdetect2uuid_mac_utilsvgwhoisvnagwebcounterwinbugtrackeryt_downloader

BlueGreycalmElegant

Català-Valencià – Catalan中文 – Chinese (Simplified)中文 – Chinese (Traditional)Česky – CzechDansk – DanishNederlands – DutchEnglish – EnglishSuomi – FinnishFrançais – FrenchDeutsch – Germanעברית – Hebrewहिंदी – HindiMagyar – HungarianBahasa Indonesia – IndonesianItaliano – Italian日本語 – Japanese한국어 – KoreanМакедонски – Macedonianमराठी – MarathiNorsk – NorwegianPolski – PolishPortuguês – PortuguesePortuguês – Portuguese (Brazil)Русский – RussianSlovenčina – SlovakSlovenščina – SlovenianEspañol – SpanishSvenska – SwedishTürkçe – TurkishУкраїнська – UkrainianOëzbekcha – Uzbek

Compare Revisions

• This comparison shows the changes necessary to convert path

  → / @ 79

  → / @ 78

  ↔ Reverse comparison

• Compare Path:	Rev

  With Path:	Rev

Regard whitespace Rev 79 → Rev 78

/trunk/Recycle Bin Unit v2/SIDUnit.pas
161,8 → 161,8
result := true;
end;
// Source: http://www.delphipraxis.net/post471470.html
// Modified
// http://www.delphipraxis.net/post471470.html
// Changed
function GetMySID(): string;
var
SID: PSID;
172,7 → 172,6
SID := nil;
err := _getAccountSid('', _getLoginNameW(), SID);
try
if err > 0 then
begin
EAPICallError.Create('_getAccountSid:' + SysErrorMessage(err));
189,9 → 188,6
begin
EAPICallError.Create('_NT_SidToString'); // TODO: RaiseLastOsError???
end;
finally
if Assigned(SID) then FreeMemory(SID);
end;
end;
end.

/trunk/Recycle Bin Unit/RecyclerFunctions.pas
788,8 → 788,8
result := true;
end;
// Source: http://www.delphipraxis.net/post471470.html
// Modified
// http://www.delphipraxis.net/post471470.html
// Changed
function _getMySID(): string;
var
SID: PSID;
799,7 → 799,6
SID := nil;
err := _getAccountSid('', _getLoginNameW(), SID);
try
if err > 0 then
begin
EAPICallError.Create('_getAccountSid:' + SysErrorMessage(err));
815,10 → 814,7
if _NT_SidToString(SID, result) then Exit;
EAPICallError.Create('_getMySID:' + SysErrorMessage(err));
finally
if Assigned(SID) then FreeMemory(SID);
end;
end;
// Originalcode aus http://www.delphipraxis.net/post2933.html
function _DriveExists(DriveByte: Byte): Boolean; overload;