AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Projekte Fucs V1.0 - Frequently used Codes
Thema durchsuchen
Ansicht
Themen-Optionen

Fucs V1.0 - Frequently used Codes

Ein Thema von TheMiller · begonnen am 5. Apr 2005 · letzter Beitrag vom 9. Mär 2006
Antwort Antwort
Seite 4 von 11   « Erste     234 56     Letzte »    
Benutzerbild von TheMiller
TheMiller
Registriert seit: 19. Mai 2003
Hallo liebe DP-Community,

ich habe letztens einen Thread eröffnet, indem ich gefragt habe, was ich programmieren könnte. Meine Kriterien waren, dass ich meinen Linux-Server dabei anspreche, die auf dem Server laufende mySQL-Datenbank und dass ich der Allgemeinheit etwas bieten kann.

Gut, soviele Antworten gab es leider nicht, aber die eine Idee hat mir besonders gut gefallen. Eine frontend CodeLibrary.

Programmfunktionen:
  • Es kann jeder Codes hinzufügen
  • Es kann jeder Codes auslesen

Gut, das war es bisher. Aber es soll noch viel mehr gemacht werden. Hatte bisher nicht viel Zeit dafür.
  • Das Programm soll ein gutes Design bekommen (darum habe ich mich garnicht gekümmert.
  • Jeder soll die Möglichkeit haben, Codes zu ändern (bzw. zu Korrigieren).
  • Drucken sollte noch ermöglicht werden.




Warum ich diese Version schon online stelle?

Ich weiß, dass diese Version vom Style und von weiteren Funktionen sehr schlecht ist. Aber ich will erstmal sehen, ob dieses Projekt Zukunft hat. Also, macht euch ans Eintragen und dann sehen wir weiter...




Was sind meine Voraussetzungen?

Also, ich mache das alles logischerweise freiwillig. Ich stelle auch aus meinem eigenen Interesse meine MySQL-Datenbank zur Verfügung. Deshalb wäre ich sehr enttäuscht, wenn hier unter uns einige Schlaumeier wären, die meinen, sie müssten die Datenbank hacken. Ich habe alle logs eingeschaltet und eigentlich großzügig Rechte vergeben. Wenn ich allerdings mehrere oder große Hacks sehe, dann werde ich darauf Konsequenzen ziehen müssen - Aber ich hoffe, dies wird nicht passieren.




Wie lange läuft der Server?

Also, ich habe den Server extra in den Flur gestellt, damit ich hier schlafen kann. Von daher läuft er meistens Tag und Nacht. Doch wenn er einmal nicht laufen sollte, meckert bitte nicht gleich rum...



Achso, ich muss auch noch das Kabel vom Switch in den Server ordentlich verlegen, da kann es auch sein, dass die DB kurzfristig nicht erreichbar ist.


Und jetzt viel Spaß..

Kritik erwünscht, aber nur, wenn ihr den gesamten Beitrag gelesen habt.
Angehängte Dateien
Dateityp: rar mysql_426.rar (345,1 KB, 115x aufgerufen)
Dateityp: rar fucs_117.rar (537,8 KB, 122x aufgerufen)
Bisheriger Nutzername "DJ-SPM"
 
microtronx

 
Delphi 2010 Enterprise
 
#31
  Alt 5. Apr 2005, 22:35
Hi,

bei mir startet zwar die Anwendung, aber wahrscheinlich war dein Server offline.

Nun, ich hätte da einen Tip bezüglich der Datenanbindung: Anstatt über mysql etc. eine DB-Connection aufzubauen, könntest du z.B. direkt über http arbeiten. Das würde dann so aussehen:

LESEN: Auf dem Server liegt ein php script, das Dir anhand von Parametern als Ergebniss eine Tabelle ausgibt, die Du dann auswertest
SCHREIBEN: Du ruftst dein "Schreib-Script" direkt auf und übergibst per POST die zu schreibenden Werte.

Somit funktioniert das ganze auch über jede Firewall / Proxy da immer nur HTTP benötigt wird. Mit Indy-Komponenten klappt die Programmierung auch sehr schnell.

Mfg. + viel Erfolg damit,
  Mit Zitat antworten Zitat
Benutzerbild von TheMiller
TheMiller

 
Delphi XE7 Architect
 
#32
  Alt 5. Apr 2005, 23:16
Ja, der Server ist wieder offline. Habe nur mal eben im Estrich einen Tunnel reingeschlagen, dass ich das Kabel raus in Flur legen konnte.

Hm, aber ich finde die MySQL-Datenbank bequem und ich arbeite gerne damit. Da gibts auch Vorteile, wie Volltextsuche

Der Server ist somit wieder online. Viel Spaß beim Eintragen!!!

Gute N8
  Mit Zitat antworten Zitat
Benutzerbild von TheMiller
TheMiller

 
Delphi XE7 Architect
 
#33
  Alt 6. Apr 2005, 13:10
Habe eine neue Version hochgeladen.

Sie hat jetzt eine Volltextsuche. Leider kann momentan nur im Code selbst gesucht werden. Werde das aber in der nächsten Stunde ändern...
  Mit Zitat antworten Zitat
Benutzerbild von gordon freeman
gordon freeman

 
Delphi 2005 Personal
 
#34
  Alt 6. Apr 2005, 14:42
Noch ein paar Anregungen:
  • Den Button der Volltextsuche beschriften 'Button1' klingt so schlecht.
  • Bei der Volltextsuche anzeigen, in welcher Kategorie der gefundene Beitrag liegt. (erleichtert das Wiederfinden)
  • Eventuell direkte Verlinkung von dem DP-Image zur DP.
Martin
  Mit Zitat antworten Zitat
Benutzerbild von TheMiller
TheMiller

 
Delphi XE7 Architect
 
#35
  Alt 6. Apr 2005, 14:56
Wird gemacht...
  Mit Zitat antworten Zitat
Benutzerbild von TheMiller
TheMiller

 
Delphi XE7 Architect
 
#36
  Alt 6. Apr 2005, 18:21
Hi,

Habe wieder eine neue Version gepostet.

Folgende Änderungen:
  • Druckfunktion eingebaut (konnte ich allerdings nicht testen. Bitte macht ihr das für mich
  • Progressbar eingebaut
  • Volltextsuche mit Kategorieanzeige eingebaut
  • Volltextsuche sucht in Titel und Code
  • TabOrder beim Hinzufügen korrigiert

Bitte testet mal die Druck-Funktion. An sonsten bitte ich euch, etwas sinnvolles einzutragen. Danke!
  Mit Zitat antworten Zitat
Benutzerbild von TheMiller
TheMiller

 
Delphi XE7 Architect
 
#37
  Alt 6. Apr 2005, 20:31
Hi,

ist es bei euch auch so, dass sich das Programm aufhängt, wenn größere Codes gepostet werden? Wollte dies posten:

Delphi-Quellcode:
{Record deklarieren. Auf die Zeichenlänge achten, die
nie mehr als 255 Zeichen enthalten darf.}


 type TAdressen = record
   Name:String[50];
   Str:String[40];
   Ort:String[20];
 end;

{Globale Variable deklarieren}

 var
   Form1: TForm1;
   datei: file of TAdressen;
   data : TAdressen;

{Daten schreiben}

 procedure TForm1.Speichern;
 begin
   try
     AssignFile(data, ExtractFilePath(ParamStr(0))+'Adressen.dat');
     IF FileExists(datei) THEN Reset(datei)
     ELSE ReWrite(datei);

     Edit1.Text:=data.Name;
     Edit2.Text:=data.Str;
     Edit3.Text:=data.Ort;

     seek(datei, filesize(datei));
     write(datei, data);
   finally
     CloseFile(datei);
   end;
 end;

 //Daten einlesen

 procedure TForm1.Speichern;
 var
   i:Integer;
 begin
   try
     AssignFile(data, ExtractFilePath(ParamStr(0))+'Adressen.dat');
     IF FileExists(datei) THEN Reset(datei)
     ELSE ReWrite(datei);

     for i:=0 to filesize(datei)-1 do
     begin
       seek(datei, filesize(i));
       read(datei, data);
       data.Name:=Edit1.Text;
       data.Str:=Edit2.Text;
       data.Ort:=Edit3.Text;
     end;
   finally
     CloseFile(datei);
   end;
 end;
Aber die Meldung war "Connection lost during query".

Doch kleine Codes gehen. Könnt ihr das bestätigen?

PS: Habe noch das Kopieren der Codes in die Zwischenablage ermöglicht.
  Mit Zitat antworten Zitat
Benutzerbild von Pr0g
Pr0g

 
Delphi 7 Personal
 
#38
  Alt 6. Apr 2005, 20:32
Also ich konnte den großen Code eintragen (in Algorithmen).

MfG Pr0g
  Mit Zitat antworten Zitat
Benutzerbild von TheMiller
TheMiller

 
Delphi XE7 Architect
 
#39
  Alt 6. Apr 2005, 20:34
Hm. Gemeinheit.

Habe aber sehr gute Verbindung... nagut.

Würde mich freuen, wenn ihr das Programm nutzen würdet!!
  Mit Zitat antworten Zitat
Benutzerbild von DGL-luke
DGL-luke

 
Delphi 2006 Professional
 
#40
  Alt 6. Apr 2005, 21:08
also, die GUI gefällt mir definitv noch nicht.

hau aus der hauptunit mal alles nichtvisuelle raus und schick sie mir mit der form - dann würd ich das mal q&d n bisschen ändern.
kannst mir auch den kompletten source geben .

verbesserungsvorschläge:
-bessere gui
-editierbarkeit(mit passwort? z.B. man kann bei erstellung des codes ein pw eingeben, mit dem man dann den code ändern kann?)
-neue kategorien
-kategorien dynamisch aus der db lesen
-das memo wieder readonly machen, wenn meine vorherigen vorschläge nicht angenommen werden
-das delphi-praxis banner wegklickbar machen/ wenn maximiert, in die rechte obere ecke schieben
-alle datensätze anzeigen - ach das gibts ja schon!
-suche(bitet sich bei sql doch geradezu an!) EDIT: das gibts gibts auch schon - ein weiterer beweis dafür, wie schlecht die gui ist
-dateien/laufwerke kategorie in "Dateisystem / IO" ändern


ansonsten: toll!
Lukas Erlacher
  Mit Zitat antworten Zitat
Antwort Antwort
Seite 4 von 11   « Erste     234 56     Letzte »    


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 14:07 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