Jump to content

Silver Black

Members
  • Content Count

    106
  • Joined

  • Last visited

Community Reputation

14 Good

About Silver Black

  • Birthday 03/07/1978

Technical Information

  • Delphi-Version
    Delphi 10.3 Rio

Recent Profile Visitors

The recent visitors block is disabled and is not being shown to other users.

  1. Silver Black

    UAC request minimized instead of full-screen

    Yes, it's already what I do.
  2. Silver Black

    UAC request minimized instead of full-screen

    No. First I don't want to disable it, second I cannot disable it on my users machines!
  3. Hi, I have a routine that I've been using successfully for a long time to start a process with admin rights elevation. But I've lately noticed that the UAC request is minimized in the task bar, instead I'd like it to appear full-screen as if the user had clicked on the executable himself. I'm using: FillChar(seExecShell, SizeOf(seExecShell), 0); seExecShell.cbSize := SizeOf(seExecShell); seExecShell.Wnd := hndCaller; seExecShell.fMask := SEE_MASK_NOCLOSEPROCESS; seExecShell.lpVerb := PWideChar(RUN_CMD); seExecShell.lpFile := PWideChar(fnFile); seExecShell.lpParameters := PWideChar(strParams); seExecShell.nShow := SW_SHOWNORMAL; Result := ShellExecuteEx(@seExecShell); ShellExecuteEx(@seExecShell); Then to manage the waiting for the the process to terminate: GetExitCodeProcess(seExecShell.hProcess, ExitCode); But even without waiting there is always the issue of the minimized UAC request. Do you think there is a workaround or this is a "by-design" feature of Windows?
  4. Silver Black

    I/O Error 103

    Ok, thank you, I'll give a look into that resource stuff. 🙂 Have a nice day!
  5. Silver Black

    I/O Error 103

    The custom-modified executable is not being modified in the field, it's only modified once after it's built by another app. After that it's not modified anymore. Yes, I only do this to MY executable created by MY othe main app, it's not intended to modify any other executable. The attached data are user-related info and the executable is a zip-auto-extractor.
  6. Silver Black

    I/O Error 103

    No, it's not the same executable that makes the changes. It's another application that creates that executables that modifies it at the end of the process.
  7. Silver Black

    I/O Error 103

    In a resource you can add any type of data? Strings, integers, etc.? Why I cannot write on an arbitrary binary file if Delphi has the proper functions to do so (BlockWrite/Read and Streams)? There is a particular reason you say so?
  8. Silver Black

    I/O Error 103

    The exe file is created by me (my program), so I just want to add additional data.
  9. Silver Black

    I/O Error 103

    Same exact code, copy and paste. I then read the record data from the Exe itself. It works in an empty project I made. I also found the solution. I'm missing this: FileMode := fmOpenReadWrite; So now it works everywhere! In the empty project I used it worked even without setting the FileMode, in my main project not because I set the FileMode to read-only previously but I wasn't aware of that.
  10. I have this simple code that writes a record at the end of a binary file (any): type TRecTestData = record strText1: String[100]; strText2: String[100]; i64BigNum: Int64; end; var fDatafile: File; intRecSize: Integer; recTestRec: TRecTestData; strTestFile: String; begin strTestFile := 'FileIOData.exe'; intRecSize := SizeOf(recTestRec); AssignFile(fDataFile, strTestFile); Reset(fDataFile, 1); Seek(fDataFile, FileSize(fDataFile)); BlockWrite(fDatafile, recTestRec, intRecSize); CloseFile(fDataFile); This works perfectly. But in my main project (+120,000 lines of code) it generates a I/O Error 103 at line BlockWrite. I've tried anything, the code is the same.
  11. Silver Black

    Updated Community Edition

    No: the CE is the full RAD Studio, that expires every year! We need a much smaller one with only Delphi main core components and no-expiration license.
  12. Silver Black

    Updated Community Edition

    Good ol' times! IMHO, Delphi should have a restricted FREE environment of its IDE, to make small desktop utilities at least and for the bigger purpose of spreading Delphi knowledge to new generations of devs. If VS has that, why not to copy from it?
  13. Silver Black

    Updated Community Edition

    Anybody remembers when Delphi 6 had the "Personal" edition that was completely FREE? I started from there.
  14. Silver Black

    Updated Community Edition

    I have to reinstall it because the one-year-license is over, so I just looked for the most updated one. By the way, I hate the fact that it's mandatory for you to reinstall the CE after one year. Totally nonsense.
  15. Silver Black

    Updated Community Edition

    Why a Delphi 10.4.1 CE edition does not exist? The CE is still in 10.3 version...
×