본문 바로가기

Developist

Delphi/간단하게 간단하게 String을 PAnsiChar로 변환하기 function StringToPAnsiChar(AString: string): PAnsiChar; begin Result := PAnsiChar(AnsiString(AString)); end;
Delphi/간단하게 간단하게 인터넷연결 체크하기 uses .., WinInet; function isInternetConnected : Boolean; var dwFlags : DWORD; begin Result := InternetGetConnectedState(@dwFlags, 0); end; - Flag 정보 https://docs.microsoft.com/en-us/windows/win32/api/wininet/nf-wininet-internetgetconnectedstate
Delphi/간단하게 간단하게 Null값 체크하고 Default 설정하기 function IsNull(AValue, ADefault: Variant): Variant; begin if VarIsNull(AValue) then Result := ADefault else Result := AValue; end;

티스토리툴바