• 0

[Delphi] Save to File


Question

Hi All,

I have searched all over the internet for a solution to my problem, but I can't find it. How would I go about saving to a file? I managed to get it to carry out a Save As function with this code:

if SaveDialog1.Execute then
  Memo1.Lines.SaveToFile(SaveDialog1.FileName);

I want it to carry out a Save function, so that if an existing file is already open, the user can save to that file, without having a specify a name in the Save As Dialog.

Thanks in advance,

Smctainsh

Link to comment
https://www.neowin.net/forum/topic/453443-delphi-save-to-file/
Share on other sites

11 answers to this question

Recommended Posts

  • 0
  AndreasV said:

Memo1.Lines.SaveToFile(SaveDialog1.FileName); would do.

I tried that, but it doesn't seem to work. I get an error saying "Cannot create file """.

I want the button to double as a save and save as function - so, I want it to show the Save dialog if the file has not yet been saved, and save to the file if it is already saved.

Smctainsh

  • 0
  AndreasV said:

if SaveDialog1.FileName = "" or SaveDialog1.Execute then

Memo1.Lines.SaveToFile(SaveDialog1.FileName);

I get an error for "" - it says 'Illegal Character in Input File'.

Smctainsh

P.S. Thanks for the quick responses. :D

  • 0
  smctainsh said:

I get an error for "" - it says 'Illegal Character in Input File'.

Smctainsh

P.S. Thanks for the quick responses. :D

Use the a single quote ' not the double quote ".

if SaveDialog1.FileName = '' or SaveDialog1.Execute then
  Memo1.Lines.SaveToFile(SaveDialog1.FileName);

  • 0
  virtorio said:

Use the a single quote ' not the double quote ".

if SaveDialog1.FileName = '' or SaveDialog1.Execute then
  Memo1.Lines.SaveToFile(SaveDialog1.FileName);

Now I am getting a Boolean Error. :( It says that string and boolean are incompatible types.

Smctainsh

  • 0
  virtorio said:

if (SaveDialog1.FileName = '') or SaveDialog1.Execute then
  Memo1.Lines.SaveToFile(SaveDialog1.FileName);

Sorry, my mistake.

When I save the file, the Save As Dialog appears, even once I have already specified a file name for it.

Smctainsh

  • 0
  smctainsh said:

When I save the file, the Save As Dialog appears, even once I have already specified a file name for it.

Smctainsh

I must admit that I never actually read the code, just looked at the syntax. It should read

if (SaveDialog1.FileName <> '') or SaveDialog1.Execute then
  Memo1.Lines.SaveToFile(SaveDialog1.FileName)

<> meaning not equal to. Personally I think storing the filename in a SaveDialog is a bad idea, and should be stored in a variable somewhere, most likely as a member of the form you have your Memo control on.

  • 0
  virtorio said:

I must admit that I never actually read the code, just looked at the syntax. It should read

if (SaveDialog1.FileName &lt;&gt; '') or SaveDialog1.Execute then
  Memo1.Lines.SaveToFile(SaveDialog1.FileName)

<> meaning not equal to. Personally I think storing the filename in a SaveDialog is a bad idea, and should be stored in a variable somewhere, most likely as a member of the form you have your Memo control on.

Thank you so much, virtorio! All help received from anyone in this thread has been very much appreciated. :D

Smctainsh

This topic is now closed to further replies.
  • Recently Browsing   0 members

    • No registered users viewing this page.
  • Posts

    • UI is slow but you prefer a slower UI to a snappier UI basically. Everyone is different.
    • XFX 9060 XT 16 GB is $349 on Amazon (shipped & sold by Amazon) https://www.amazon.com/dp/B0F8...p;previewDohDeal=1&th=1 People - never trust any neowin deals posted - they are the worst at seeking deals, and just want to peddle their own to make a quick buck. It's disgusting.
    • It's a grey market key - proceed at your own risk. It's baffling that neowin supports this shady stuff.
    • Arc 1.57.0 by Razvan Serea ARC browser is finally here for Windows, bringing its unique and modern approach to browsing. With a clean interface and a powerful sidebar, ARC makes managing tabs and organizing your workflow a breeze. You can group tabs, pin important pages, and quickly switch between work and personal spaces without clutter. It’s designed to be fast, customizable, and genuinely useful, making it more than just a browser—it’s a productivity tool. If you’re on Windows and want a fresh way to browse and stay organized, ARC is worth checking out. ARC browser key features: Split View: Work with multiple tabs side by side in a single window for efficient multitasking. Tab Grouping: Organize tabs into customizable groups for better workflow management. Pinned Tabs: Keep essential pages permanently accessible in the sidebar. Spaces: Create separate workspaces for different projects or personal use, reducing clutter. Sidebar Integration: Access bookmarks, notes, and tools directly from the sidebar for quick navigation. Customizable Themes: Personalize the browser’s appearance with themes and color schemes. Quick Search: Find tabs, history, or bookmarks instantly with a powerful search bar. Lightning-Fast Performance: Built for speed with optimized resource usage and minimal lag. Built-in Note-Taking: Jot down ideas or save snippets directly within the browser. Focus Mode: Hide distractions and focus on a single tab or task. Cross-Device Syncing: Seamlessly sync your data across multiple devices for a unified experience. Keyboard Shortcuts: Boost productivity with customizable shortcuts for common actions. AI-Powered Suggestions: Get smart recommendations for tabs, bookmarks, and workflows. Privacy Controls: Built-in tools for blocking trackers and managing cookies for enhanced security. Extensions Support: Compatible with popular browser extensions to extend functionality. Arc Browser 1.57.0 release notes: ''Thanks as always for using Arc. This week's release includes a bump to Chromium 137.0.7151.69, which patched three security vulnerabilities. Enjoy!'' Download: Arc Browser 1.57.0 | 1.9 MB (Freeware) View: Arc Browser Website | Screenshot Get alerted to all of our Software updates on Twitter at @NeowinSoftware
  • Recent Achievements

    • First Post
      Uranus_enjoyer earned a badge
      First Post
    • Week One Done
      Uranus_enjoyer earned a badge
      Week One Done
    • Week One Done
      jfam earned a badge
      Week One Done
    • First Post
      survivor303 earned a badge
      First Post
    • Week One Done
      CHUNWEI earned a badge
      Week One Done
  • Popular Contributors

    1. 1
      +primortal
      427
    2. 2
      +FloatingFatMan
      237
    3. 3
      ATLien_0
      213
    4. 4
      snowy owl
      210
    5. 5
      Xenon
      160
  • Tell a friend

    Love Neowin? Tell a friend!