freepascal

    0

    1답변

    fpFork() 호출을 사용하여 다중 스레드 tcp 서버를 작성했습니다. 잘 작동하지만 클라이언트가 좀비 프로세스를 중단 한 후에도 남아 있습니다. 들어오는 연결을 기다리는 무한 루프가 있습니다. 포크를 보내서 아이에게 전달하십시오. 그러면 아이를 돌보고 끝내겠습니다. 그러나 아이는 부모가 끝날 때까지 좀비로 남아 있습니다. while True do

    2

    1답변

    var a: Integer; begin a:= 300; if a in [100..500] then WriteLn ('YES') else WriteLn ('NO') end.

    1

    1답변

    나는 freepascal xml 튜토리얼과 게시물이 많이 있음을 알고 있지만 지금까지 발견 된 것이 아무것도 없다. API를 통해 Odoo에 연결하여 데이터를 얻고 처리하고 응답하는 Lazarus 데스크톱 앱을 구축 중입니다. xml 응답 구조는 작업하기가 어렵습니다 (적어도 나에게). 예 응답은 다음과 같습니다 <?xml version='1.0'?> <

    1

    1답변

    누군가 나를 도와 줄 수 있습니까? 내가 삽입 정렬 (파스칼)을 이해하려고합니다. 그러나 나는 그것이 정말로 복잡하다는 것을 안다. 누군가 나에게 간단한 코드를 만들 수 있습니까? 사용자가 5 개의 숫자 (배열)를 입력 한 다음 삽입 정렬을 사용합니다. 이것은 정말로 나를 이해하는 데 많은 도움이 될 것입니다. 이 내가 지금 무엇을 가지고,하지만 난이 올바

    1

    1답변

    bsr이 64 비트 숫자로 작동하도록합니다. 그러나 다음은 입력의 하위 32 비트에서만 작동합니다. function BSR64(const Val: Int64): Integer; begin asm bsr eax, [Val] ... 어떻게해야합니까? 저는 Lazarus를 사용하여 64 비트 모드로 컴파일하고 있습니다.

    2

    1답변

    아래의 간단한 코드에서 Len은 할당되지 않았습니다. function Test64(const Val: Int64; var Len: Integer): Integer; begin asm mov [Len], $1 end; end; 64 비트 모드로 컴파일 중입니다. 이것은 델파이 (32 비트)에서 작동합니다. 나사로에서 어떻게 작동시킬 수

    2

    3답변

    아래 코드는 32 비트 (해당 레지스터 이름 변경)를 준수하면 올바르게 작동합니다. 그러나 실행될 때 오류가 발생합니다 (경고 : "project1.o"객체 파일은 컴파일시 ".data.n_tc_p $ project1_orbitkeyheader64 $ int64 $ longint $$ int64_shufidx". "기호로 32 비트 절대 재배치 됨). fu

    0

    1답변

    많은 Windows 프로그램은 관리 프롬프트없이 시작할 때 업데이트를 실행할 수 있습니다. 마찬가지로, 내 프로그램은 사용자 입력없이 스스로 업데이트해야합니다. 로그인 한 모든 사용자는 프로그램을 사용할 수 있어야합니다. 내 프로그램은 이미 새 업데이트를 찾아서 다운로드하여 실행할 수 있지만 NSIS 설치 관리자/업데이트 프로그램에는 관리자 권한이 필요합니

    -3

    1답변

    나는 freepascal의 돈 관리 프로그램을 오랫동안 사용해 왔으며 최근에는 몇 가지 제한 사항을 해결하기 위해 포인터를 사용하기 시작했습니다. 그것은 90 %의 시간 동안 잘 동작합니다. 임의의 시간에 발생하는 것으로 보이는 EAccessViolation을 디버깅하려고합니다. 나는 모든 포인터를 확인했다. 어디에나 할당되었거나, 액세스되었거나 해방되었다

    -2

    2답변

    나는 lazarus를 사용하고 있으며 프로그램이 닫힐 때 txt 파일에 정보를 저장하려고합니다. 그러나 프로그램을 다시 열 때마다 txt 파일에 이전에 있던 내용을 덮어 씁니다. 다음 줄에 쓰거나 매번 다른 txt 파일을 만드는 것이 좋습니다. var ... s: TStringList; s:= TStringList.Create;