Re: Dateizugriff/Verwaltung funktionieren nicht
Wo hast Du es denn hingeschrieben? Zeig doch mal die ersten paar Zeilen der Unit.
|
Re: Dateizugriff/Verwaltung funktionieren nicht
Delphi-Quellcode:
unit form;
uses SysUtils; interface procedure formular; implementation uses unit6; procedure formular; var hhp, hhc, hhk, css, html: String; begin Form1.PageControl1.ActivePage := Form1.TabSheet1; Form1.PageControl2.ActivePage := Form1.TabSheet7; Form1.Caption := 'project'; Form1.JvFileListBox1.Mask := '*.hhp;*.hhc;*.hhk;*.css;*.html'; hhp := ExtractFileExt(Form1.JvFileListBox1.FileName); If FileExists(hhp) = true then begin Form1.SetVisibleTabs([5,6]); end else begin Form1.SetVisibleTabs([1]); end; end; |
Re: Dateizugriff/Verwaltung funktionieren nicht
Delphi-Quellcode:
interface
uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs; |
Re: Dateizugriff/Verwaltung funktionieren nicht
Danke, jetzt habe ich es hinbekommen!
|
Alle Zeitangaben in WEZ +1. Es ist jetzt 08:30 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