Ergebnis der Suchanfrage

• Forum: Sonstige Fragen zu Delphi
    Delphi
    by MrSpock, 31. Jul 2002
  Hallo m-werk,
  
  der Code dazu wäre:
  
  Aktualisieren.Enabled := (ExtractFilePath(Label1.Caption) = ExtractFilePath(Label4.Caption));
  
  Du musst aber noch die korrekte Stelle finden, an der diese Anweisung eingefügt werden soll. Es muss eine Stelle sein, an der sowohl Label1 als auch Label4 ihre Werte korrekt anzeigen.
• Forum: Sonstige Fragen zu Delphi
    Delphi
    by MrSpock, 30. Jul 2002
  Hallo m-werk,
  
  das war nur die Deklaration aus der Unit SysUtils.
  
  Wenn du also
  uses SysUtils
  
  in deiner Anwendung verwendest, kannst du die Codebeispiele problemlos übersetzen. Dort habe ich ja den Aufruf eingebaut.
• Forum: Sonstige Fragen zu Delphi
    Delphi
    by MrSpock, 30. Jul 2002
  Hallo m-werk,
  
  
  ...
  begin
  b:=Form1.Label4.Caption;
  REG:=TRegistry.Create;
  try
  REG.RootKey := HKEY_CURRENT_USER;
  if REG.OpenKey('Software\AriusDB\SettingsDB', True) then
• Forum: Sonstige Fragen zu Delphi
    Delphi
    by MrSpock, 30. Jul 2002
  Hallo m-werk,
  
  dazu gibt es die Funktion:
  
  function ExtractFilePath(const FileName: string): string;
  
  diese gibt als Ergebnis nur den Pfad zurück, der in FileName enthalten ist.