Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Programmieren allgemein (https://www.delphipraxis.net/40-programmieren-allgemein/)
-   -   [Delphi] ASM => applicationdata (https://www.delphipraxis.net/109723-%5Bdelphi%5D-asm-%3D-applicationdata.html)

o0o 6. Mär 2008 14:29


[Delphi] ASM => applicationdata
 
hallo leutz, mein problem ist ich bekomme es nicht hin den pfad zu applicationsdata per delphi in asm auszulesen^^

fuer den windowsordner gings damit:
Delphi-Quellcode:
function GetWindowsDirectory: string;
var
path : array [0..MAX_PATH] of char;
begin
asm
lea eax, path
test eax, eax
push eax
xor eax, eax
call GetWindowsDirectoryA
end;
result := string(path)+'\'
end;
nur ich brauch es noch fuer applicationsdata beim deutschen windows sollte das glaub dann so aussehen:

c:\dokumente und einstellungen\administrator\anwendungsdaten\

waere euch sehr verbunden wenn ihr mir ein wenig unter die arme greifen koennted,...

da o0o

[edit=SirThornberry]Code-Tags durch Delphi-Tags ersetzt - nächstes mal bitte richtige Tags wählen - Mfg, SirThornberry[/edit]

Zacherl 6. Mär 2008 14:35

Re: [Delphi] ASM => applicationdata
 
Versuchs mal über SHGetSpecialFolder ..

Delphi-Quellcode:
unit ShellFolder;

interface

uses
  Windows;

const
  CSIDL_ADMINTOOLS = $0030;
  // The file system directory that is used to store administrative tools for an individual user. The Microsoft Management Console (MMC) will save customized consoles to this directory, and it will roam with the user.
  CSIDL_ALTSTARTUP = $001d;
  // The file system directory that corresponds to the user's nonlocalized Startup program group.
  CSIDL_APPDATA = $001a;
  // The file system directory that serves as a common repository for application-specific data. A typical path is C:\Documents and Settings\username\Application Data. This CSIDL is supported by the redistributable Shfolder.dll for systems that do not have the Microsoft® Internet Explorer 4.0 integrated Shell installed.
  CSIDL_BITBUCKET = $000a;
  // The virtual folder containing the objects in the user's Recycle Bin.
  CSIDL_CDBURN_AREA = $003b;
  // The file system directory acting as a staging area for files waiting to be written to CD. A typical path is C:\Documents and Settings\username\Local Settings\Application Data\Microsoft\CD Burning.
  CSIDL_COMMON_ADMINTOOLS = $002f;
  // The file system directory containing administrative tools for all users of the computer.
  CSIDL_COMMON_ALTSTARTUP = $001e;
  // The file system directory that corresponds to the nonlocalized Startup program group for all users. Valid only for Microsoft Windows NT® systems.
  CSIDL_COMMON_APPDATA = $0023;
  // The file system directory containing application data for all users. A typical path is C:\Documents and Settings\All Users\Application Data.
  CSIDL_COMMON_DESKTOPDIRECTORY = $0019;
  // The file system directory that contains files and folders that appear on the desktop for all users. A typical path is C:\Documents and Settings\All Users\Desktop. Valid only for Windows NT systems.
  CSIDL_COMMON_DOCUMENTS = $002e;
  // The file system directory that contains documents that are common to all users. A typical paths is C:\Documents and Settings\All Users\Documents. Valid for Windows NT systems and Microsoft Windows® 95 and Windows 98 systems with Shfolder.dll installed.
  CSIDL_COMMON_FAVORITES = $001f;
  // The file system directory that serves as a common repository for favorite items common to all users. Valid only for Windows NT systems.
  CSIDL_COMMON_MUSIC = $0035;
  // The file system directory that serves as a repository for music files common to all users. A typical path is C:\Documents and Settings\All Users\Documents\My Music.
  CSIDL_COMMON_PICTURES = $0036;
  // The file system directory that serves as a repository for image files common to all users. A typical path is C:\Documents and Settings\All Users\Documents\My Pictures.
  CSIDL_COMMON_PROGRAMS = $0017;
  // The file system directory that contains the directories for the common program groups that appear on the Start menu for all users. A typical path is C:\Documents and Settings\All Users\Start Menu\Programs. Valid only for Windows NT systems.
  CSIDL_COMMON_STARTMENU = $0016;
  // The file system directory that contains the programs and folders that appear on the Start menu for all users. A typical path is C:\Documents and Settings\All Users\Start Menu. Valid only for Windows NT systems.
  CSIDL_COMMON_STARTUP = $0018;
  // The file system directory that contains the programs that appear in the Startup folder for all users. A typical path is C:\Documents and Settings\All Users\Start Menu\Programs\Startup. Valid only for Windows NT systems.
  CSIDL_COMMON_TEMPLATES = $002d;
  // The file system directory that contains the templates that are available to all users. A typical path is C:\Documents and Settings\All Users\Templates. Valid only for Windows NT systems.
  CSIDL_COMMON_VIDEO = $0037;
  // The file system directory that serves as a repository for video files common to all users. A typical path is C:\Documents and Settings\All Users\Documents\My Videos.
  CSIDL_CONTROLS = $0003;
  // The virtual folder containing icons for the Control Panel applications.
  CSIDL_COOKIES = $0021;
  // The file system directory that serves as a common repository for Internet cookies. A typical path is C:\Documents and Settings\username\Cookies.
  CSIDL_DESKTOP = $0000;
  // The virtual folder representing the Windows desktop, the root of the namespace.
  CSIDL_DESKTOPDIRECTORY = $0010;
  // The file system directory used to physically store file objects on the desktop (not to be confused with the desktop folder itself). A typical path is C:\Documents and Settings\username\Desktop.
  CSIDL_DRIVES = $0011;
  // The virtual folder representing My Computer, containing everything on the local computer: storage devices, printers, and Control Panel. The folder may also contain mapped network drives.
  CSIDL_FAVORITES = $0006;
  // The file system directory that serves as a common repository for the user's favorite items. A typical path is C:\Documents and Settings\username\Favorites.
  CSIDL_FONTS = $0014;
  // A virtual folder containing fonts. A typical path is C:\Windows\Fonts.
  CSIDL_HISTORY = $0022;
  // The file system directory that serves as a common repository for Internet history items.
  CSIDL_INTERNET = $0001;
  // A virtual folder representing the Internet.
  CSIDL_INTERNET_CACHE = $0020;
  // Version 4.72. The file system directory that serves as a common repository for temporary Internet files. A typical path is C:\Documents and Settings\username\Local Settings\Temporary Internet Files.
  CSIDL_LOCAL_APPDATA = $001c;
  // The file system directory that serves as a data repository for local (nonroaming) applications. A typical path is C:\Documents and Settings\username\Local Settings\Application Data.
  CSIDL_MYDOCUMENTS = $000c;
  // The virtual folder representing the My Documents desktop item. This should not be confused with CSIDL_PERSONAL, which represents the file system folder that physically stores the documents.
  CSIDL_MYMUSIC = $000d;
  // The file system directory that serves as a common repository for music files. A typical path is C:\Documents and Settings\User\My Documents\My Music.
  CSIDL_MYPICTURES = $0027;
  // The file system directory that serves as a common repository for image files. A typical path is C:\Documents and Settings\username\My Documents\My Pictures.
  CSIDL_MYVIDEO = $000e;
  // The file system directory that serves as a common repository for video files. A typical path is C:\Documents and Settings\username\My Documents\My Videos.
  CSIDL_NETHOOD = $0013;
  // A file system directory containing the link objects that may exist in the My Network Places virtual folder. It is not the same as CSIDL_NETWORK, which represents the network namespace root. A typical path is C:\Documents and Settings\username\NetHood.
  CSIDL_NETWORK = $0012;
  // A virtual folder representing Network Neighborhood, the root of the network namespace hierarchy.
  CSIDL_PERSONAL = $0005;
  // The file system directory used to physically store a user's common repository of documents. A typical path is C:\Documents and Settings\username\My Documents. This should be distinguished from the virtual My Documents folder in the namespace, identified by CSIDL_MYDOCUMENTS. To access that virtual folder, use SHGetFolderLocation, which returns the ITEMIDLIST for the virtual location, or refer to the technique described in Managing the File System.
  CSIDL_PRINTERS = $0004;
  // The virtual folder containing installed printers.
  CSIDL_PRINTHOOD = $001b;
  // The file system directory that contains the link objects that can exist in the Printers virtual folder. A typical path is C:\Documents and Settings\username\PrintHood.
  CSIDL_PROFILE = $0028;
  // The user's profile folder. A typical path is C:\Documents and Settings\username. Applications should not create files or folders at this level; they should put their data under the locations referred to by CSIDL_APPDATA or CSIDL_LOCAL_APPDATA.
  CSIDL_PROFILES = $003e;
  // The file system directory containing user profile folders. A typical path is C:\Documents and Settings.
  CSIDL_PROGRAM_FILES = $0026;
  // The Program Files folder. A typical path is C:\Program Files.
  CSIDL_PROGRAM_FILES_COMMON = $002b;
  // A folder for components that are shared across applications. A typical path is C:\Program Files\Common. Valid only for Windows NT, Windows 2000, and Windows XP systems. Not valid for Windows Millennium Edition (Windows Me).
  CSIDL_PROGRAMS = $0002;
  // The file system directory that contains the user's program groups (which are themselves file system directories). A typical path is C:\Documents and Settings\username\Start Menu\Programs.
  CSIDL_RECENT = $0008;
  // The file system directory that contains shortcuts to the user's most recently used documents. A typical path is C:\Documents and Settings\username\My Recent Documents. To create a shortcut in this folder, use SHAddToRecentDocs. In addition to creating the shortcut, this function updates the Shell's list of recent documents and adds the shortcut to the My Recent Documents submenu of the Start menu.
  CSIDL_SENDTO = $0009;
  // The file system directory that contains Send To menu items. A typical path is C:\Documents and Settings\username\SendTo.
  CSIDL_STARTMENU = $000b;
  // The file system directory containing Start menu items. A typical path is C:\Documents and Settings\username\Start Menu.
  CSIDL_STARTUP = $0007;
  // The file system directory that corresponds to the user's Startup program group. The system starts these programs whenever any user logs onto Windows NT or starts Windows 95. A typical path is C:\Documents and Settings\username\Start Menu\Programs\Startup.
  CSIDL_SYSTEM = $0025;
  // The Windows System folder. A typical path is C:\Windows\System32.
  CSIDL_TEMPLATES = $0015;
  // The file system directory that serves as a common repository for document templates. A typical path is C:\Documents and Settings\username\Templates.
  CSIDL_WINDOWS = $0024;
  // The Windows directory or SYSROOT. This corresponds to the %windir% or %SYSTEMROOT% environment variables. A typical path is C:\Windows.

function GetShellFolder(CSIDL: Integer): string;

implementation

type
  PSHItemID = ^TSHItemID;
  {$EXTERNALSYM _SHITEMID}
  _SHITEMID = record
    cb: Word;
    abID: array[0..0] of Byte;
  end;
  TSHItemID = _SHITEMID;
  {$EXTERNALSYM SHITEMID}
  SHITEMID = _SHITEMID;

type
  PItemIDList = ^TItemIDList;
  {$EXTERNALSYM _ITEMIDLIST}
  _ITEMIDLIST = record
     mkid: TSHItemID;
   end;
  TItemIDList = _ITEMIDLIST;
  {$EXTERNALSYM ITEMIDLIST}
  ITEMIDLIST = _ITEMIDLIST;

function SHGetSpecialFolderLocation(hwndOwner: HWND; nFolder: Integer;
  var ppidl: PItemIDList): HResult; stdcall; external 'shell32.dll' name 'SHGetSpecialFolderLocation';

function SHGetPathFromIDList(pidl: PItemIDList; pszPath: PChar): BOOL; stdcall; external 'shell32.dll' name 'SHGetPathFromIDListA';

function GetShellFolder(CSIDL: Integer): string;
var
  pidl: PItemIdList;
  FolderPath: string;
  SystemFolder: Integer;
begin
  SystemFolder := CSIDL;
  if SUCCEEDED(SHGetSpecialFolderLocation(0, SystemFolder, pidl)) then
  begin
    SetLength(FolderPath, max_path);
    if SHGetPathFromIDList(pidl, Pchar(FolderPath)) then
    begin
      SetLength(FolderPath, length(Pchar(FolderPath)));
    end;
  end;
  Result := FolderPath;
end;

end.
oder direkt in ASM (grade so aus dem Kopf .. kann sein, dass es noch nicht ganz klappt)

Delphi-Quellcode:
function GetShellFolder(CSIDL: Integer): string;
var
  pidl: PItemIdList;
  FolderPath: string;
  SystemFolder: Integer;
asm
  mov SystemFolder, CSIDL
  push pidl
  push SystemFolder
  push 0
  call SHGetSpecialFolderLocation
  push eax
  call SUCCEEDED
  cmp eax, 0
  je @@ExitProc
  push MAX_PATH
  push FolderPath
  call SetLength
  push [FolderPath]
  push pidl
  call SHGetPathFromIDList
  cmp eax, 0
  je @@ExitProc
  push [FolderPath]
  call Length
  push eax
  push FolderPath
  call SetLength
  @@ExitProc:
    mov Result, FolderPath
end;

o0o 6. Mär 2008 15:13

Re: [Delphi] ASM => applicationdata
 
ich danke dir vielmals fuer deine muehe:)
der delphicode funkt einwandfrei, nur der asmcode nichtso^^

Zitat:

[DCC Fehler] shellfolder.pas(177): E2116 Ungültige Kombination von Opcode und Operanden
[DCC Fehler] shellfolder.pas(184): E2116 Ungültige Kombination von Opcode und Operanden
[DCC Fehler] shellfolder.pas(187): E2116 Ungültige Kombination von Opcode und Operanden
sry aber ich hab von delphi schon nicht all zu viel ahnung und wies dann mit asm steht koennt ihr euch ausmalen:D
weiss leider nicht was da falsch ist...

da o0o

Dax 6. Mär 2008 15:39

Re: [Delphi] ASM => applicationdata
 
Warum willst du das überhaupt mit ASM machen?

sirius 6. Mär 2008 15:59

Re: [Delphi] ASM => applicationdata
 
Zitat:

Zitat von o0o
sry aber ich hab von delphi schon nicht all zu viel ahnung und wies dann mit asm steht koennt ihr euch ausmalen:D
weiss leider nicht was da falsch ist...

Auch wenn es mit der Zeit wohl sehr wenig geworden sein dürften. Aber es gibt bestimmt noch welche, die ASM perfekt können, aber von Delphi nur den Namen kennen.

o0o 6. Mär 2008 16:06

Re: [Delphi] ASM => applicationdata
 
Zitat:

Zitat von Dax
Warum willst du das überhaupt mit ASM machen?

ja es gehoert zu einem freiwilligen projekt das ich von der schule aus machen soll...in delphi,vb,c++ war das nicht all zu schwer nur an asm hock ich jetzt schon 2tage und komme nicht vorran ausser derbe kopfweh^^

@sirius
es gibt genug, is mir schon klar nur erstmal finden^^
ausserdem muss ich das in delphi einpacken daher bin ich denk ich mal hier richtig da ich von asm kein plan habe...

da o0o

1234588 6. Mär 2008 16:15

Re: [Delphi] ASM => applicationdata
 
Delphi-Quellcode:
function GetWindowsDirectory: string;
var
  p: PChar;
  s: String;
begin
  new(p);
asm
  push MAX_PATH
  push p
  call GetWindowsDirectoryA
end;
  result := p;
  dispose(p)
end;

o0o 6. Mär 2008 16:25

Re: [Delphi] ASM => applicationdata
 
lol naja thx aber das is im prinzip das selbe wie der code den ich ganz obn als erstes geposted habe^^

wenn du ihn so umschreiben kannst dass ich den ordner anwendungsdaten bekomme vom aktuellen user und nicht den windows-ordner waere ich dir sehr verbunden:)

da o0o

1234588 6. Mär 2008 16:32

Re: [Delphi] ASM => applicationdata
 
was du suchst ist die GetEnvironmentVariable() funktion
http://msdn2.microsoft.com/en-us/library/ms683188.aspx


//edit
hatte gerade feierabend und hab nicht richtig mitgelesen, sry :P

du hast uebrigens in deinem asm schnipsel einen großen fehler. GetWindowsDirectoryA() erwartet 2 parameter, du wirfst aber nur einen auf den stack.

Zacherl 6. Mär 2008 17:18

Re: [Delphi] ASM => applicationdata
 
Ne das mit ShGetSpecialFolder ist schon richtig .. warte ich schreibs um, sodass es funktioniert :P

o0o 6. Mär 2008 17:19

Re: [Delphi] ASM => applicationdata
 
hmm ok...das ist ein schnipsel den ich im inet fand^^
von daher bitte nicht boese sein ich hab von asm echt kein plan...ist nur fuer die schule^^

wuesstest du jetzt eig wie ich das fuer den ordner anwendungsdaten umbaue? ich kann mit deinem link jetzt nicht viel anfangen^^

da o0o

jbg 6. Mär 2008 18:06

Re: [Delphi] ASM => applicationdata
 
Ich hoffe kein anderer versucht mit Hilfe der bisher geposteten Codes (Zacherl mal ausgenommen) was zu lernen.


@1234588: Wen denkst du wieviele Bytes du mit New(P) [P: PChar] reservierst? Genau ein einziges. Die Kompressionsalgorithmen sind zwar mittlerweile recht gut, aber so gut auch wieder nicht als dass sie einen mehrere Zeichen umfassenden Pfad in ein Byte quetschen könnten.

Nun zu dem Pascal-Assembler Gemisch. Assembler ist gar nicht notwendig und macht das ganze nur kompliziert.
Delphi-Quellcode:
function GetWindowsDirectory: string;
var
  path: array[0..MAX_PATH] of Char;
begin
  SetString(Result, path, GetWindowsDirectory(path, SizeOf(path)));
  Result := Result + '\';
end;
Und nun zur Lösung des Problems:
Delphi-Quellcode:
function GetSpecialPath(nFolder: Integer): string;
var
  Buffer: array[0..MAX_PATH] of Char;
begin
  if SHGetSpecialFolderPath(Application.Handle, Buffer, nFolder, False) then
    Result := Buffer
  else
    RaiseLastOSError;
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
  ShowMessage( GetSpecialPath(CSIDL_APPDATA) );
end;

Zacherl 6. Mär 2008 18:10

Re: [Delphi] ASM => applicationdata
 
Ich glaube er will in allen möglichen Sprachen den Windows Pfad und den AppData Pfad ermitteln .. daher möchte er auch Assembler verwenden. Warum inline Assembler und nicht direkt MASM32 weiß ich auch nicht .. hab mal bisschen rumgewerkelt, aber die auskommentierten Zeilen bekomme ich in inline Assembler nicht hin:

Delphi-Quellcode:
function GetShellFolder(CSIDL: Integer): string;
var
  pidl: PItemIdList;
  FolderPath: String;
  SystemFolder: Integer;
begin
  asm
    mov eax, CSIDL
    mov SystemFolder, eax
    lea eax, pidl
    push eax
    push SystemFolder
    push 0
    call SHGetSpecialFolderLocation
    push eax
    call SUCCEEDED
    cmp eax, 0
    je @@ExitProc
    // SetLength(FolderPath, MAX_PATH)
    push FolderPath
    push pidl
    call SHGetPathFromIDList
    cmp eax, 0
    je @@ExitProc
    // SetLength(FolderPath, Length(PChar(FolderPath))
    // Result := FolderPath
    @@ExitProc:
  end;
end;
Ansonsten funktioniert es ..

sirius 6. Mär 2008 18:15

Re: [Delphi] ASM => applicationdata
 
Bei den Auskommentierten Zeilen musst du direkt die Funktionen aus der Unit System aufrufen. Andernfalls geht es nicht innerhalb von Delphi. Denn ein bisschen muss man schon mit dem Speichermanager zusammenarbeiten.
Ein bisschen rauskürzen geht noch, wenn du FolderPath selber verwaltest. Und besser sieht es noch aus, wenn du die lokalen Variablen komplett selber übernimmst. Dann musst du nur noch beim result auf Delphi-gombadibilideed achten.

Zacherl 6. Mär 2008 18:23

Re: [Delphi] ASM => applicationdata
 
So hier .. die dummen Strings mit PChar ersetzt und bisschen optimiert. Ohne Strings ist es sehr einfach:

Delphi-Quellcode:
function GetShellFolder(CSIDL: Integer): PChar;
var
  PIDL: PItemIdList;
  SystemFolder: Integer;
asm
  mov eax, CSIDL
  mov SystemFolder, eax
  lea eax, PIDL
  push eax
  push SystemFolder
  push 0
  call SHGetSpecialFolderLocation
  push eax
  call SUCCEEDED
  cmp eax, 0
  je @@ExitProc
  push MAX_PATH
  push GPTR
  call GlobalAlloc
  push eax
  call GlobalLock
  mov Result, eax
  push Result
  push PIDL
  call SHGetPathFromIDList
  @@ExitProc:
end;

sirius 6. Mär 2008 18:27

Re: [Delphi] ASM => applicationdata
 
Und wer gibt den Speicher wieder frei?
Setze doch einfach den StackPointer um MaxPath nach unten und kopiere den Inhalt dann in den String und schiebe den Stackpointer zurück.

Zacherl 6. Mär 2008 18:41

Re: [Delphi] ASM => applicationdata
 
Keine Ahnung wie du das meinst .. zeig mir das mal bitte anhand des Codes.

Apollonius 6. Mär 2008 20:34

Re: [Delphi] ASM => applicationdata
 
Wie willst du aus einer Funktion einen PChar zurückgeben, ohne Verwirrung zu stiften? Entweder du kopierst die Zeichenkette in einen vorgegebenen PChar (so machen es die WinAPIs) oder du gibst einen String zurück. Andernfalls muss der Nutzer nämlich raten, ob er HeapFree, LocalFree, GlobalFree oder FreeMem nehmen muss, um aufzuräumen.
Und du kannst eine Menge optimieren, lokale Variablen rausschmeißen, kein cmp eax, 0 verwenden (sonder test eax, eax)...

o0o 7. Mär 2008 02:39

Re: [Delphi] ASM => applicationdata
 
leutz ich danke euch:)
es klappt...^^

wenn der source auch nicht ganz fehlerfrei ist macht nix es muss nur asm sein,...mein lehrer kann kein asm von daher egal, er will nur sehen dass asm dabei ist;)

mfg o0o

SirThornberry 7. Mär 2008 10:32

Re: [Delphi] ASM => applicationdata
 
das einfachste ist es einfach in Delphi zu schreiben und dann beim debuggen mal die CPUAnsicht zu öffnen. Da hast du das ganze in asm stehen. Aber warum einfach wenns auch schwer geht ;-)

o0o 7. Mär 2008 15:19

Re: [Delphi] ASM => applicationdata
 
0_o omg klappt das echt??? xDDD

ich probiers mal scherzeshalber aus...hatte da garnicht dran gedacht^^

da o0o

Zacherl 7. Mär 2008 15:48

Re: [Delphi] ASM => applicationdata
 
Zitat:

Zitat von Apollonius
Wie willst du aus einer Funktion einen PChar zurückgeben, ohne Verwirrung zu stiften? Entweder du kopierst die Zeichenkette in einen vorgegebenen PChar (so machen es die WinAPIs) oder du gibst einen String zurück. Andernfalls muss der Nutzer nämlich raten, ob er HeapFree, LocalFree, GlobalFree oder FreeMem nehmen muss, um aufzuräumen.
Und du kannst eine Menge optimieren, lokale Variablen rausschmeißen, kein cmp eax, 0 verwenden (sonder test eax, eax)...

Würde mich mal interessieren wie man das jetzt optimiert. Codebeispiel erwünscht :P Mache normal nichts mit inline Assembler .. wenn dann richtig MASM32.

Apollonius 7. Mär 2008 16:53

Re: [Delphi] ASM => applicationdata
 
Weil du es bist:
Delphi-Quellcode:
function GetShellFolder(CSIDL: Integer): PChar;
asm
  push eax //das ist die Variable PIDL
  push esp
  push eax
  push 0
  call SHGetSpecialFolderLocation
  test eax, eax
  jnz @@ExitProc
  push MAX_PATH
  push GMEM_FIXED
  call GlobalAlloc
  pop edx
  push eax
  push eax
  push edx
  call SHGetPathFromIDList
  pop eax
  @@ExitProc:
end;
Allgemein ist test Register, Register besser als cmp Register, 0, da es in 2 statt 3 Bytes codiert wird. Außerdem ist bei GMEM_FIXED bzw. GPTR kein GlobalLock notwendig.
Des Weiteren führt der Code (auch meiner) zu einem Speicherleck: PIDL soll man laut MSDN mit dem IMalloc der Shell freigeben.

SirThornberry 7. Mär 2008 17:03

Re: [Delphi] ASM => applicationdata
 
um sich die Arbeit zu ersparen kann man anstelle von SHGetSpecialFolderLocation auch SHGetSpecialFolderPath verwenden.

Zacherl 7. Mär 2008 17:26

Re: [Delphi] ASM => applicationdata
 
Oki Danke dir Apollonius :thumb: Was ich noch nicht verstehe ist wo du Result setzt und wo du CLSID ausließt. Werden die Werte automatisch in die von dir verwendeten Register geschrieben?

Apollonius 7. Mär 2008 17:28

Re: [Delphi] ASM => applicationdata
 
Aufrufkonvention Register -> erster Parameter in EAX, zweiter in EDX, dritter in ECX, weitere auf dem Stack, außerdem wird bei allen Aufrufkonventionen außer Safecall der Rückgabewert in EAX gespeichert.


Alle Zeitangaben in WEZ +1. Es ist jetzt 00:47 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz