Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi SyntaxFrage (https://www.delphipraxis.net/94615-syntaxfrage.html)

Tommy1988 24. Jun 2007 10:39


SyntaxFrage
 
Folgenden Code habe ich gesucht/gefunden/gelesen/verstanden und gelernt..

so..

Delphi-Quellcode:
function GetUsername: String;
var
  Buffer: array[0..255] of Char;
  Size: DWord;
begin
  Size := SizeOf(Buffer);
  if not Windows.GetUserName(Buffer, Size) then
    RaiseLastOSError;
  SetString(Result, Buffer, Size - 1);
end;
Jetzt frage ich mich nur, ob das hier Speichern in einer Variable) so in Ordnung ist:

Delphi-Quellcode:
var
x : String;
begin
X := GetUsername;
end;

fwsp 24. Jun 2007 10:41

Re: SyntaxFrage
 
Zitat:

Zitat von Tommy1988
Jetzt frage ich mich nur, ob das hier Speichern in einer Variable) so in Ordnung ist:

klar. probier es doch mal aus.

Tommy1988 24. Jun 2007 10:43

Re: SyntaxFrage
 
Hab ich schon :D sieht nur etwas komisch aus deswegen.

KÖNNTE man auch die zuordnung zur variablen WEG lassen und immer da wo man den namen braucht die funktion aufrufen (zwar doof.. aber würde das gehen ?)

Matze 24. Jun 2007 10:44

Re: SyntaxFrage
 
Na klar würde das gehen.

3_of_8 24. Jun 2007 10:44

Re: SyntaxFrage
 
Natürlich.

mkinzler 24. Jun 2007 10:45

Re: SyntaxFrage
 
Warum sollte das nicht gehen?

Tommy1988 24. Jun 2007 10:59

Re: SyntaxFrage
 
Ich möchte jetzt nicht extra noch einen Thread aufmachen deswgeen meine Frage:


ich versuche mit dieser funktion
Delphi-Quellcode:
function FolderSize(FolderName: string): Int64;
var
  fldr, fso: OleVariant;
begin
  fso   := CreateOleObject('Scripting.FileSystemObject');
  fldr  := fso.GetFolder(FolderName);

  result := fldr.size;
end;
die größe eines verzeichnisses zu emritteln.

oben habe ich
FolderName: String;
so vereinbart.

und dann eine konstante festgelegt:
Delphi-Quellcode:
const
  FolderMame =
'Dokumente und Einstellungen\Administrator\';
ButtonClick:
FolderSize(FolderMame);

Nur leider bekomme ich eine Fehlermeldung.

mkinzler 24. Jun 2007 11:02

Re: SyntaxFrage
 
Es wäre vielleicht auch interessant, welcher Fehler gemeldet wird

Blackheart 24. Jun 2007 11:03

Re: SyntaxFrage
 
FolderName - FolderMame
FolderName erwartet vieleicht einen Relativen Pfad.

Tommy1988 24. Jun 2007 11:17

Re: SyntaxFrage
 
mh, ok ich hab hinbekommen, aber wie schreibe ich Die FolderSize ins Caption?

Das ist ja Int64, und Capion ein String

mkinzler 24. Jun 2007 11:20

Re: SyntaxFrage
 
IntToStr, Format u.ä. konnte helfen

Matze 24. Jun 2007 11:25

Re: SyntaxFrage
 
Auch für dich gilt pro Frage einen neuen Thread zu erstellen, ob du das willst oder nicht! Und die Suche gibt's auch noch. :roll:

Die Delphi-Grundlagen wären auch nicht schlecht: Crashkurs. Die brauchst du generell und diese fehlen dir.

DP-Maintenance 24. Jun 2007 11:28

DP-Maintenance
 
Dieses Thema wurde von "Matze" von "VCL / WinForms / Controls" nach "Object-Pascal / Delphi-Language" verschoben.

Christian Seehase 24. Jun 2007 14:05

Re: SyntaxFrage
 
Moin Tommy,

Zitat:

Zitat von Tommy1988
KÖNNTE man auch die zuordnung zur variablen WEG lassen und immer da wo man den namen braucht die funktion aufrufen (zwar doof.. aber würde das gehen ?)

Wie schon gesagt wurde: Geht natürlich.

Aber:
Ein Funktionsaufruf dauert meist länger, als das Auslesen einer Variablen.


Alle Zeitangaben in WEZ +1. Es ist jetzt 12:48 Uhr.

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